home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1994-12-20 | 23.0 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 24 f4 20 20 20 | 20 20 20 20 43 72 61 7a |...$. | Craz|
|00000010| 79 20 70 61 76 69 6e 67 | 20 6d 69 6e 65 73 77 65 |y paving| mineswe|
|00000020| 65 70 65 72 0d 00 14 1f | 76 65 72 73 69 6f 6e 24 |eper....|version$|
|00000030| 3d 22 30 2e 30 31 20 28 | 32 30 2d 44 65 63 2d 39 |="0.01 (|20-Dec-9|
|00000040| 34 29 22 0d 00 1e 1e f4 | 20 20 20 20 20 20 20 a9 |4)".....| .|
|00000050| 20 41 2e 57 2e 47 61 72 | 72 61 72 64 20 31 39 39 | A.W.Gar|rard 199|
|00000060| 34 0d 00 28 05 f4 0d 00 | 32 24 f4 20 57 68 61 74 |4..(....|2$. What|
|00000070| 20 61 72 65 20 79 6f 75 | 20 72 65 61 64 69 6e 67 | are you| reading|
|00000080| 20 74 68 69 73 20 66 6f | 72 3f 0d 00 3c 25 f4 20 | this fo|r?..<%. |
|00000090| 54 68 65 72 65 20 49 53 | 20 61 20 68 65 6c 70 20 |There IS| a help |
|000000a0| 66 69 6c 65 2c 20 79 6f | 75 20 6b 6e 6f 77 2e 0d |file, yo|u know..|
|000000b0| 00 46 38 f4 20 54 68 69 | 73 20 69 73 20 66 61 72 |.F8. Thi|s is far|
|000000c0| 20 74 6f 6f 20 62 61 64 | 6c 79 20 77 72 69 74 74 | too bad|ly writt|
|000000d0| 65 6e 20 74 6f 20 62 65 | 20 77 6f 72 74 68 20 68 |en to be| worth h|
|000000e0| 61 63 6b 69 6e 67 2e 0d | 00 50 05 f4 0d 00 5a 21 |acking..|.P....Z!|
|000000f0| ee 85 20 c8 99 22 48 6f | 75 72 67 6c 61 73 73 5f |.. .."Ho|urglass_|
|00000100| 53 6d 61 73 68 22 3a f6 | 3a f1 9e 3a e0 0d 00 64 |Smash":.|:..:...d|
|00000110| 0a c8 99 36 2c 31 35 0d | 00 6e 11 de 20 72 70 63 |...6,15.|.n.. rpc|
|00000120| 6d 6f 64 65 25 20 32 38 | 0d 00 78 0f 21 72 70 63 |mode% 28|..x.!rpc|
|00000130| 6d 6f 64 65 25 3d 31 0d | 00 82 12 72 70 63 6d 6f |mode%=1.|...rpcmo|
|00000140| 64 65 25 21 34 3d 36 34 | 30 0d 00 8c 12 72 70 63 |de%!4=64|0....rpc|
|00000150| 6d 6f 64 65 25 21 38 3d | 32 35 36 0d 00 96 11 72 |mode%!8=|256....r|
|00000160| 70 63 6d 6f 64 65 25 21 | 31 32 3d 32 0d 00 a0 12 |pcmode%!|12=2....|
|00000170| 72 70 63 6d 6f 64 65 25 | 21 31 36 3d 2d 31 0d 00 |rpcmode%|!16=-1..|
|00000180| aa 12 72 70 63 6d 6f 64 | 65 25 21 32 30 3d 2d 31 |..rpcmod|e%!20=-1|
|00000190| 0d 00 b4 12 72 70 63 6d | 6f 64 65 25 21 32 34 3d |....rpcm|ode%!24=|
|000001a0| 31 32 0d 00 be 3b e7 20 | a6 28 2d 32 35 36 29 3e |12...;. |.(-256)>|
|000001b0| 3d 31 36 35 20 6d 61 63 | 68 69 6e 65 24 3d 22 52 |=165 mac|hine$="R|
|000001c0| 69 73 63 20 50 43 22 20 | 8b 20 6d 61 63 68 69 6e |isc PC" |. machin|
|000001d0| 65 24 3d 22 41 20 73 65 | 72 69 65 73 22 0d 00 c8 |e$="A se|ries"...|
|000001e0| 10 66 69 6c 65 66 6f 75 | 6e 64 25 3d b9 0d 00 d2 |.filefou|nd%=....|
|000001f0| 35 ee 85 20 e7 20 9f 3d | 32 30 34 20 66 69 6c 65 |5.. . .=|204 file|
|00000200| 66 6f 75 6e 64 25 3d a3 | 3a e5 20 9e 2b 31 30 20 |found%=.|:. .+10 |
|00000210| 8b 20 ff 28 22 53 68 75 | 74 22 29 3a f6 3a f1 9e |. .("Shu|t"):.:..|
|00000220| 3a e0 0d 00 dc 23 6d 6f | 64 65 66 69 6c 65 25 3d |:....#mo|defile%=|
|00000230| 8e 22 3c 43 50 4d 24 50 | 61 74 68 3e 6d 6f 64 65 |."<CPM$P|ath>mode|
|00000240| 66 69 6c 65 22 0d 00 e6 | 19 e7 20 66 69 6c 65 66 |file"...|.. filef|
|00000250| 6f 75 6e 64 25 3d a3 20 | e5 20 8d 54 4e 41 0d 00 |ound%=. |. .TNA..|
|00000260| f0 35 ee 85 20 e7 20 9f | 3d 32 32 32 20 66 69 6c |.5.. . .|=222 fil|
|00000270| 65 66 6f 75 6e 64 25 3d | a3 3a e5 20 9e 2b 31 30 |efound%=|.:. .+10|
|00000280| 20 8b 20 ff 28 22 53 68 | 75 74 22 29 3a f6 3a f1 | . .("Sh|ut"):.:.|
|00000290| 9e 3a e0 0d 00 fa 64 6d | 6f 64 65 6f 66 66 25 3d |.:....dm|odeoff%=|
|000002a0| 34 3a f5 20 e8 23 6d 6f | 64 65 66 69 6c 65 25 2c |4:. .#mo|defile%,|
|000002b0| 6d 6f 64 65 24 3a 72 70 | 63 6d 6f 64 65 25 21 6d |mode$:rp|cmode%!m|
|000002c0| 6f 64 65 6f 66 66 25 3d | a0 28 6d 6f 64 65 24 29 |odeoff%=|.(mode$)|
|000002d0| 3a 6d 6f 64 65 6f 66 66 | 25 2b 3d 34 3a fd 6d 6f |:modeoff|%+=4:.mo|
|000002e0| 64 65 6f 66 66 25 3d 32 | 38 20 84 20 c5 23 6d 6f |deoff%=2|8 . .#mo|
|000002f0| 64 65 66 69 6c 65 25 0d | 01 04 0f d9 23 6d 6f 64 |defile%.|....#mod|
|00000300| 65 66 69 6c 65 25 0d 01 | 0e 54 ee 85 20 e7 20 9f |efile%..|.T.. . .|
|00000310| 3d 31 37 20 ff 28 22 53 | 68 75 74 22 29 3a c8 99 |=17 .("S|hut"):..|
|00000320| 22 48 6f 75 72 67 6c 61 | 73 73 5f 53 6d 61 73 68 |"Hourgla|ss_Smash|
|00000330| 22 3a e0 20 8b 20 ff 28 | 22 53 68 75 74 22 29 3a |":. . .(|"Shut"):|
|00000340| c8 99 22 48 6f 75 72 67 | 6c 61 73 73 5f 53 6d 61 |.."Hourg|lass_Sma|
|00000350| 73 68 22 3a f6 3a f1 9e | 3a e0 0d 01 18 09 eb 20 |sh":.:..|:...... |
|00000360| eb 3a 87 0d 01 22 4a f2 | 67 65 74 73 63 72 65 65 |.:..."J.|getscree|
|00000370| 6e 69 6e 66 6f 28 78 73 | 63 61 6c 65 25 2c 79 73 |ninfo(xs|cale%,ys|
|00000380| 63 61 6c 65 25 2c 78 6d | 69 6e 2c 78 6d 61 78 2c |cale%,xm|in,xmax,|
|00000390| 79 6d 69 6e 2c 79 6d 61 | 78 2c 74 6f 70 62 6f 72 |ymin,yma|x,topbor|
|000003a0| 64 65 72 2c 6d 69 6e 5f | 64 69 73 74 29 0d 01 2c |der,min_|dist)..,|
|000003b0| 3b c8 99 22 4f 53 5f 52 | 65 61 64 4d 6f 64 65 56 |;.."OS_R|eadModeV|
|000003c0| 61 72 69 61 62 6c 65 22 | 2c 2d 31 2c 31 30 20 b8 |ariable"|,-1,10 .|
|000003d0| 20 2c 2c 63 6f 6c 6f 75 | 72 73 5f 69 6e 5f 74 68 | ,,colou|rs_in_th|
|000003e0| 69 73 5f 6d 6f 64 65 25 | 0d 01 36 14 6d 6f 64 65 |is_mode%|..6.mode|
|000003f0| 5f 73 75 69 74 61 62 6c | 65 25 3d b9 0d 01 40 13 |_suitabl|e%=...@.|
|00000400| 63 75 72 72 65 6e 74 5f | 6d 6f 64 65 25 3d eb 0d |current_|mode%=..|
|00000410| 01 4a 2f e7 20 63 6f 6c | 6f 75 72 73 5f 69 6e 5f |.J/. col|ours_in_|
|00000420| 74 68 69 73 5f 6d 6f 64 | 65 25 3c 3e 32 20 6d 6f |this_mod|e%<>2 mo|
|00000430| 64 65 5f 73 75 69 74 61 | 62 6c 65 25 3d a3 0d 01 |de_suita|ble%=...|
|00000440| 54 2e e7 20 6d 61 63 68 | 69 6e 65 24 3d 22 52 69 |T.. mach|ine$="Ri|
|00000450| 73 63 20 50 43 22 20 80 | 20 63 75 72 72 65 6e 74 |sc PC" .| current|
|00000460| 5f 6d 6f 64 65 25 3e 31 | 32 37 20 8c 0d 01 5e 71 |_mode%>1|27 ...^q|
|00000470| 20 20 e7 20 72 70 63 6d | 6f 64 65 25 21 34 3d 63 | . rpcm|ode%!4=c|
|00000480| 75 72 72 65 6e 74 5f 6d | 6f 64 65 25 21 34 20 80 |urrent_m|ode%!4 .|
|00000490| 20 72 70 63 6d 6f 64 65 | 25 21 38 3d 63 75 72 72 | rpcmode|%!8=curr|
|000004a0| 65 6e 74 5f 6d 6f 64 65 | 25 21 38 20 80 20 72 70 |ent_mode|%!8 . rp|
|000004b0| 63 6d 6f 64 65 25 21 31 | 32 3d 63 75 72 72 65 6e |cmode%!1|2=curren|
|000004c0| 74 5f 6d 6f 64 65 25 21 | 31 32 20 8c 20 6d 6f 64 |t_mode%!|12 . mod|
|000004d0| 65 5f 73 75 69 74 61 62 | 6c 65 25 3d a3 0d 01 68 |e_suitab|le%=...h|
|000004e0| 06 20 cc 0d 01 72 34 20 | 20 e7 20 72 70 63 6d 6f |. ...r4 | . rpcmo|
|000004f0| 64 65 25 21 32 34 3d 63 | 75 72 72 65 6e 74 5f 6d |de%!24=c|urrent_m|
|00000500| 6f 64 65 25 20 8c 20 6d | 6f 64 65 5f 73 75 69 74 |ode% . m|ode_suit|
|00000510| 61 62 6c 65 25 3d a3 0d | 01 7c 06 20 cd 0d 01 86 |able%=..|.|. ....|
|00000520| 16 e7 20 6d 6f 64 65 5f | 73 75 69 74 61 62 6c 65 |.. mode_|suitable|
|00000530| 25 20 8c 0d 01 90 34 20 | 20 f2 63 65 6e 74 72 65 |% ....4 | .centre|
|00000540| 28 22 55 73 65 20 74 68 | 69 73 20 73 63 72 65 65 |("Use th|is scree|
|00000550| 6e 20 6d 6f 64 65 20 28 | 59 2f 4e 29 3f 22 2c 79 |n mode (|Y/N)?",y|
|00000560| 72 6f 77 25 2f 32 29 0d | 01 9a 0a 20 20 47 24 3d |row%/2).|... G$=|
|00000570| be 0d 01 a4 19 20 20 e7 | 20 47 24 3d 22 79 22 20 |..... .| G$="y" |
|00000580| 84 20 47 24 3d 22 79 22 | 20 8c 0d 01 ae 1e 20 20 |. G$="y"| ..... |
|00000590| 20 20 e7 20 6d 61 63 68 | 69 6e 65 24 3d 22 52 69 | . mach|ine$="Ri|
|000005a0| 73 63 20 50 43 22 20 8c | 0d 01 b8 24 20 20 20 20 |sc PC" .|...$ |
|000005b0| 20 20 72 70 63 6d 6f 64 | 65 25 21 34 3d 63 75 72 | rpcmod|e%!4=cur|
|000005c0| 72 65 6e 74 5f 6d 6f 64 | 65 25 21 34 0d 01 c2 24 |rent_mod|e%!4...$|
|000005d0| 20 20 20 20 20 20 72 70 | 63 6d 6f 64 65 25 21 38 | rp|cmode%!8|
|000005e0| 3d 63 75 72 72 65 6e 74 | 5f 6d 6f 64 65 25 21 38 |=current|_mode%!8|
|000005f0| 0d 01 cc 26 20 20 20 20 | 20 20 72 70 63 6d 6f 64 |...& | rpcmod|
|00000600| 65 25 21 31 32 3d 63 75 | 72 72 65 6e 74 5f 6d 6f |e%!12=cu|rrent_mo|
|00000610| 64 65 25 21 31 32 0d 01 | d6 26 20 20 20 20 20 20 |de%!12..|.& |
|00000620| 72 70 63 6d 6f 64 65 25 | 21 31 36 3d 63 75 72 72 |rpcmode%|!16=curr|
|00000630| 65 6e 74 5f 6d 6f 64 65 | 25 21 31 36 0d 01 e0 1e |ent_mode|%!16....|
|00000640| 20 20 20 20 20 20 f4 20 | 70 72 61 79 20 6e 6f 20 | . |pray no |
|00000650| 65 78 74 72 61 20 69 6e | 66 6f 0d 01 ea 0a 20 20 |extra in|fo.... |
|00000660| 20 20 20 cc 0d 01 f4 17 | 20 20 20 20 20 20 72 70 | .....| rp|
|00000670| 63 6d 6f 64 65 25 21 32 | 34 3d eb 0d 01 fe 0a 20 |cmode%!2|4=..... |
|00000680| 20 20 20 20 cd 0d 02 08 | 27 20 20 20 20 6d 6f 64 | ....|' mod|
|00000690| 65 66 69 6c 65 25 3d ae | 22 3c 43 50 4d 24 50 61 |efile%=.|"<CPM$Pa|
|000006a0| 74 68 3e 6d 6f 64 65 66 | 69 6c 65 22 0d 02 12 21 |th>modef|ile"...!|
|000006b0| 20 20 20 20 f1 23 6d 6f | 64 65 66 69 6c 65 25 2c | .#mo|defile%,|
|000006c0| c3 28 72 70 63 6d 6f 64 | 65 25 21 34 29 0d 02 1c |.(rpcmod|e%!4)...|
|000006d0| 21 20 20 20 20 f1 23 6d | 6f 64 65 66 69 6c 65 25 |! .#m|odefile%|
|000006e0| 2c c3 28 72 70 63 6d 6f | 64 65 25 21 38 29 0d 02 |,.(rpcmo|de%!8)..|
|000006f0| 26 22 20 20 20 20 f1 23 | 6d 6f 64 65 66 69 6c 65 |&" .#|modefile|
|00000700| 25 2c c3 28 72 70 63 6d | 6f 64 65 25 21 31 32 29 |%,.(rpcm|ode%!12)|
|00000710| 0d 02 30 22 20 20 20 20 | f1 23 6d 6f 64 65 66 69 |..0" |.#modefi|
|00000720| 6c 65 25 2c c3 28 72 70 | 63 6d 6f 64 65 25 21 31 |le%,.(rp|cmode%!1|
|00000730| 36 29 0d 02 3a 22 20 20 | 20 20 f1 23 6d 6f 64 65 |6)..:" | .#mode|
|00000740| 66 69 6c 65 25 2c c3 28 | 72 70 63 6d 6f 64 65 25 |file%,.(|rpcmode%|
|00000750| 21 32 30 29 0d 02 44 22 | 20 20 20 20 f1 23 6d 6f |!20)..D"| .#mo|
|00000760| 64 65 66 69 6c 65 25 2c | c3 28 72 70 63 6d 6f 64 |defile%,|.(rpcmod|
|00000770| 65 25 21 32 34 29 0d 02 | 4e 13 20 20 20 20 d9 23 |e%!24)..|N. .#|
|00000780| 6d 6f 64 65 66 69 6c 65 | 25 0d 02 58 08 20 20 20 |modefile|%..X. |
|00000790| cd 0d 02 62 06 20 cd 0d | 02 6c 54 ee 85 20 e7 20 |...b. ..|.lT.. . |
|000007a0| 9f 3d 31 37 20 ff 28 22 | 53 68 75 74 22 29 3a c8 |.=17 .("|Shut"):.|
|000007b0| 99 22 48 6f 75 72 67 6c | 61 73 73 5f 53 6d 61 73 |."Hourgl|ass_Smas|
|000007c0| 68 22 3a e0 20 8b 20 ff | 28 22 53 68 75 74 22 29 |h":. . .|("Shut")|
|000007d0| 3a c8 99 22 48 6f 75 72 | 67 6c 61 73 73 5f 53 6d |:.."Hour|glass_Sm|
|000007e0| 61 73 68 22 3a f6 3a f1 | 9e 3a e0 0d 02 76 18 61 |ash":.:.|.:...v.a|
|000007f0| 72 63 6d 6f 64 65 25 3d | 72 70 63 6d 6f 64 65 25 |rcmode%=|rpcmode%|
|00000800| 21 32 34 0d 02 80 38 e7 | 20 6d 61 63 68 69 6e 65 |!24...8.| machine|
|00000810| 24 3d 22 52 69 73 63 20 | 50 43 22 20 6d 6f 64 65 |$="Risc |PC" mode|
|00000820| 25 3d 72 70 63 6d 6f 64 | 65 25 20 8b 20 6d 6f 64 |%=rpcmod|e% . mod|
|00000830| 65 25 3d 61 72 63 6d 6f | 64 65 25 0d 02 8a 0c eb |e%=arcmo|de%.....|
|00000840| 6d 6f 64 65 25 3a 87 0d | 02 94 4a f2 67 65 74 73 |mode%:..|..J.gets|
|00000850| 63 72 65 65 6e 69 6e 66 | 6f 28 78 73 63 61 6c 65 |creeninf|o(xscale|
|00000860| 25 2c 79 73 63 61 6c 65 | 25 2c 78 6d 69 6e 2c 78 |%,yscale|%,xmin,x|
|00000870| 6d 61 78 2c 79 6d 69 6e | 2c 79 6d 61 78 2c 74 6f |max,ymin|,ymax,to|
|00000880| 70 62 6f 72 64 65 72 2c | 6d 69 6e 5f 64 69 73 74 |pborder,|min_dist|
|00000890| 29 0d 02 9e 27 f2 73 65 | 74 63 6f 6c 6f 75 72 73 |)...'.se|tcolours|
|000008a0| 3a f2 70 6f 73 68 74 69 | 74 6c 65 28 22 43 52 41 |:.poshti|tle("CRA|
|000008b0| 5a 59 4d 49 4e 45 22 29 | 0d 02 a8 19 de 20 62 6f |ZYMINE")|..... bo|
|000008c0| 75 6e 64 61 72 79 5f 6c | 69 6e 65 73 28 34 2c 32 |undary_l|ines(4,2|
|000008d0| 29 0d 02 b2 38 f2 73 65 | 74 62 6f 75 6e 64 61 72 |)...8.se|tboundar|
|000008e0| 69 65 73 28 62 6f 75 6e | 64 61 72 79 5f 6c 69 6e |ies(boun|dary_lin|
|000008f0| 65 73 28 29 2c 78 6d 69 | 6e 2c 78 6d 61 78 2c 79 |es(),xmi|n,xmax,y|
|00000900| 6d 69 6e 2c 79 6d 61 78 | 29 0d 02 bc 06 fb 33 0d |min,ymax|).....3.|
|00000910| 02 c6 17 f2 63 65 6e 74 | 72 65 28 76 65 72 73 69 |....cent|re(versi|
|00000920| 6f 6e 24 2c 31 29 0d 02 | d0 34 f2 63 65 6e 74 72 |on$,1)..|.4.centr|
|00000930| 65 28 22 57 65 6c 63 6f | 6d 65 20 74 6f 20 63 72 |e("Welco|me to cr|
|00000940| 61 7a 79 20 70 61 76 69 | 6e 67 20 6d 69 6e 65 73 |azy pavi|ng mines|
|00000950| 77 65 65 70 65 72 22 2c | 34 29 0d 02 da 34 f2 63 |weeper",|4)...4.c|
|00000960| 65 6e 74 72 65 28 22 55 | 73 65 20 73 65 6c 65 63 |entre("U|se selec|
|00000970| 74 20 74 6f 20 63 6c 65 | 61 72 2c 20 61 64 6a 75 |t to cle|ar, adju|
|00000980| 73 74 20 74 6f 20 66 6c | 61 67 22 2c 35 29 0d 02 |st to fl|ag",5)..|
|00000990| e4 34 f2 63 65 6e 74 72 | 65 28 22 61 6e 64 20 6d |.4.centr|e("and m|
|000009a0| 65 6e 75 20 74 6f 20 71 | 75 65 72 79 20 63 65 6c |enu to q|uery cel|
|000009b0| 6c 73 2e 20 50 6c 65 61 | 73 65 20 73 65 65 22 2c |ls. Plea|se see",|
|000009c0| 36 29 0d 02 ee 34 f2 63 | 65 6e 74 72 65 28 22 74 |6)...4.c|entre("t|
|000009d0| 68 65 20 68 65 6c 70 20 | 66 69 6c 65 20 66 6f 72 |he help |file for|
|000009e0| 20 6d 6f 72 65 20 69 6e | 66 6f 72 6d 61 74 69 6f | more in|formatio|
|000009f0| 6e 2e 22 2c 37 29 0d 02 | f8 34 f2 63 65 6e 74 72 |n.",7)..|.4.centr|
|00000a00| 65 28 22 54 6f 20 65 78 | 69 74 20 66 72 6f 6d 20 |e("To ex|it from |
|00000a10| 74 68 65 20 70 72 6f 67 | 72 61 6d 2c 20 70 72 65 |the prog|ram, pre|
|00000a20| 73 73 20 74 68 65 22 2c | 38 29 0d 03 02 27 f2 63 |ss the",|8)...'.c|
|00000a30| 65 6e 74 72 65 28 22 3c | 45 73 63 3e 20 6b 65 79 |entre("<|Esc> key|
|00000a40| 20 61 74 20 61 6e 79 20 | 74 69 6d 65 2e 22 2c 39 | at any |time.",9|
|00000a50| 29 0d 03 0c 30 f2 63 65 | 6e 74 72 65 28 22 43 61 |)...0.ce|ntre("Ca|
|00000a60| 6c 63 75 6c 61 74 65 20 | 6e 65 77 20 67 72 69 64 |lculate |new grid|
|00000a70| 20 28 59 2f 4e 29 3f 22 | 2c 79 72 6f 77 25 2f 32 | (Y/N)?"|,yrow%/2|
|00000a80| 29 0d 03 16 08 47 24 3d | be 0d 03 20 18 f2 63 65 |)....G$=|... ..ce|
|00000a90| 6e 74 72 65 28 22 20 22 | 2c 79 72 6f 77 25 2f 32 |ntre(" "|,yrow%/2|
|00000aa0| 29 0d 03 2a 17 e7 20 47 | 24 3d 22 59 22 20 84 20 |)..*.. G|$="Y" . |
|00000ab0| 47 24 3d 22 79 22 20 8c | 0d 03 34 14 20 20 63 61 |G$="y" .|..4. ca|
|00000ac0| 6c 63 75 6c 61 74 69 6e | 67 25 3d b9 0d 03 3e 35 |lculatin|g%=...>5|
|00000ad0| 20 20 f1 8a 28 78 63 6f | 6c 25 2d a9 28 22 4e 75 | ..(xco|l%-.("Nu|
|00000ae0| 6d 62 65 72 20 6f 66 20 | 63 65 6c 6c 73 3d 20 20 |mber of |cells= |
|00000af0| 22 29 29 20 81 20 32 2c | 79 72 6f 77 25 2f 32 29 |")) . 2,|yrow%/2)|
|00000b00| 3b 0d 03 48 26 20 20 e8 | 22 4e 75 6d 62 65 72 20 |;..H& .|"Number |
|00000b10| 6f 66 20 63 65 6c 6c 73 | 3d 22 6e 6f 5f 6f 66 5f |of cells|="no_of_|
|00000b20| 70 6f 69 6e 74 73 25 0d | 03 52 1f 20 20 de 20 70 |points%.|.R. . p|
|00000b30| 6f 69 6e 74 73 28 6e 6f | 5f 6f 66 5f 70 6f 69 6e |oints(no|_of_poin|
|00000b40| 74 73 25 2c 31 29 0d 03 | 5c 4e 20 20 f2 70 6c 61 |ts%,1)..|\N .pla|
|00000b50| 63 65 70 6f 69 6e 74 73 | 28 70 6f 69 6e 74 73 28 |cepoints|(points(|
|00000b60| 29 2c 6e 6f 5f 6f 66 5f | 70 6f 69 6e 74 73 25 2c |),no_of_|points%,|
|00000b70| 78 6d 69 6e 2c 78 6d 61 | 78 2c 79 6d 61 78 2c 79 |xmin,xma|x,ymax,y|
|00000b80| 6d 69 6e 2c 6d 69 6e 5f | 64 69 73 74 2c 62 6f 72 |min,min_|dist,bor|
|00000b90| 64 65 72 29 0d 03 66 29 | 20 20 f2 70 6c 6f 74 70 |der)..f)| .plotp|
|00000ba0| 6f 69 6e 74 73 28 70 6f | 69 6e 74 73 28 29 2c 6e |oints(po|ints(),n|
|00000bb0| 6f 5f 6f 66 5f 70 6f 69 | 6e 74 73 25 29 0d 03 70 |o_of_poi|nts%)..p|
|00000bc0| 3f 20 20 f2 6f 75 74 70 | 75 74 70 6f 69 6e 74 73 |? .outp|utpoints|
|00000bd0| 28 70 6f 69 6e 74 73 28 | 29 2c 6e 6f 5f 6f 66 5f |(points(|),no_of_|
|00000be0| 70 6f 69 6e 74 73 25 2c | 78 6d 69 6e 2c 78 6d 61 |points%,|xmin,xma|
|00000bf0| 78 2c 79 6d 61 78 2c 79 | 6d 69 6e 29 0d 03 7a 5b |x,ymax,y|min)..z[|
|00000c00| 20 20 f2 6f 75 74 70 75 | 74 5f 6e 65 61 72 65 73 | .outpu|t_neares|
|00000c10| 74 5f 76 65 72 74 69 63 | 65 73 28 70 6f 69 6e 74 |t_vertic|es(point|
|00000c20| 73 28 29 2c 6e 6f 5f 6f | 66 5f 70 6f 69 6e 74 73 |s(),no_o|f_points|
|00000c30| 25 2c 62 6f 75 6e 64 61 | 72 79 5f 6c 69 6e 65 73 |%,bounda|ry_lines|
|00000c40| 28 29 2c 78 6d 69 6e 2c | 78 6d 61 78 2c 79 6d 69 |(),xmin,|xmax,ymi|
|00000c50| 6e 2c 79 6d 61 78 29 0d | 03 84 06 20 cc 0d 03 8e |n,ymax).|... ....|
|00000c60| 14 20 20 63 61 6c 63 75 | 6c 61 74 69 6e 67 25 3d |. calcu|lating%=|
|00000c70| a3 0d 03 98 27 20 20 f2 | 69 6e 70 75 74 70 6f 69 |....' .|inputpoi|
|00000c80| 6e 74 73 28 78 6d 69 6e | 2c 78 6d 61 78 2c 79 6d |nts(xmin|,xmax,ym|
|00000c90| 61 78 2c 79 6d 69 6e 29 | 0d 03 a2 55 20 20 f1 8a |ax,ymin)|...U ..|
|00000ca0| 28 78 63 6f 6c 25 2d a9 | 28 22 4e 75 6d 62 65 72 |(xcol%-.|("Number|
|00000cb0| 20 6f 66 20 63 65 6c 6c | 73 3d 20 20 22 29 29 20 | of cell|s= ")) |
|00000cc0| 81 20 32 2c 79 72 6f 77 | 25 2f 32 29 3b 22 4e 75 |. 2,yrow|%/2);"Nu|
|00000cd0| 6d 62 65 72 20 6f 66 20 | 63 65 6c 6c 73 3d 22 3b |mber of |cells=";|
|00000ce0| 6e 6f 5f 6f 66 5f 70 6f | 69 6e 74 73 25 0d 03 ac |no_of_po|ints%...|
|00000cf0| 06 20 cd 0d 03 b6 27 f2 | 69 6e 70 75 74 76 65 72 |. ....'.|inputver|
|00000d00| 74 69 63 65 73 28 78 6d | 69 6e 2c 78 6d 61 78 2c |tices(xm|in,xmax,|
|00000d10| 79 6d 69 6e 2c 79 6d 61 | 78 29 0d 03 c0 36 f2 73 |ymin,yma|x)...6.s|
|00000d20| 6f 72 74 62 6f 75 6e 64 | 61 72 69 65 73 28 76 65 |ortbound|aries(ve|
|00000d30| 72 74 69 63 65 73 28 29 | 2c 70 6f 69 6e 74 73 28 |rtices()|,points(|
|00000d40| 29 2c 6e 6f 5f 6f 66 5f | 70 6f 69 6e 74 73 25 29 |),no_of_|points%)|
|00000d50| 0d 03 ca 05 f5 0d 03 d4 | 1c 20 20 f2 63 65 6e 74 |........|. .cent|
|00000d60| 72 65 28 22 20 22 2c 31 | 2b 79 72 6f 77 25 2f 32 |re(" ",1|+yrow%/2|
|00000d70| 29 0d 03 de 37 20 20 f1 | 8a 28 78 63 6f 6c 25 2d |)...7 .|.(xcol%-|
|00000d80| a9 28 22 4e 75 6d 62 65 | 72 20 6f 66 20 63 65 6c |.("Numbe|r of cel|
|00000d90| 6c 73 3d 20 20 22 29 29 | 20 81 20 32 2c 31 2b 79 |ls= "))| . 2,1+y|
|00000da0| 72 6f 77 25 2f 32 29 3b | 0d 03 e8 29 20 20 e8 22 |row%/2);|...) ."|
|00000db0| 4e 75 6d 62 65 72 20 6f | 66 20 6d 69 6e 65 73 3d |Number o|f mines=|
|00000dc0| 22 6e 75 6d 62 65 72 5f | 6f 66 5f 6d 69 6e 65 73 |"number_|of_mines|
|00000dd0| 25 0d 03 f2 91 20 20 e7 | 20 ac 28 6e 75 6d 62 65 |%.... .| .(numbe|
|00000de0| 72 5f 6f 66 5f 6d 69 6e | 65 73 25 3c 3d 6e 6f 5f |r_of_min|es%<=no_|
|00000df0| 6f 66 5f 70 6f 69 6e 74 | 73 25 20 80 20 6e 75 6d |of_point|s% . num|
|00000e00| 62 65 72 5f 6f 66 5f 6d | 69 6e 65 73 25 3e 30 29 |ber_of_m|ines%>0)|
|00000e10| 20 f2 63 65 6e 74 72 65 | 28 22 53 6f 72 72 79 2c | .centre|("Sorry,|
|00000e20| 20 6e 75 6d 62 65 72 20 | 6f 66 20 6d 69 6e 65 73 | number |of mines|
|00000e30| 20 6d 75 73 74 20 62 65 | 20 62 65 74 77 65 65 6e | must be| between|
|00000e40| 20 31 20 61 6e 64 20 6e | 75 6d 62 65 72 20 6f 66 | 1 and n|umber of|
|00000e50| 20 63 65 6c 6c 73 22 2c | 32 2b 79 72 6f 77 25 2f | cells",|2+yrow%/|
|00000e60| 32 29 0d 03 fc 3b 20 fd | 20 6e 75 6d 62 65 72 5f |2)...; .| number_|
|00000e70| 6f 66 5f 6d 69 6e 65 73 | 25 3c 3d 6e 6f 5f 6f 66 |of_mines|%<=no_of|
|00000e80| 5f 70 6f 69 6e 74 73 25 | 20 80 20 6e 75 6d 62 65 |_points%| . numbe|
|00000e90| 72 5f 6f 66 5f 6d 69 6e | 65 73 25 3e 30 0d 04 06 |r_of_min|es%>0...|
|00000ea0| 29 e7 20 6e 75 6d 62 65 | 72 5f 6f 66 5f 6d 69 6e |). numbe|r_of_min|
|00000eb0| 65 73 25 3c 3d 6e 6f 5f | 6f 66 5f 70 6f 69 6e 74 |es%<=no_|of_point|
|00000ec0| 73 25 2d 34 20 8c 0d 04 | 10 43 20 20 f2 63 65 6e |s%-4 ...|.C .cen|
|00000ed0| 74 72 65 28 22 57 6f 75 | 6c 64 20 79 6f 75 20 6c |tre("Wou|ld you l|
|00000ee0| 69 6b 65 20 63 6f 72 6e | 65 72 73 20 74 6f 20 62 |ike corn|ers to b|
|00000ef0| 65 20 73 61 66 65 20 28 | 59 2f 4e 29 3f 22 2c 32 |e safe (|Y/N)?",2|
|00000f00| 2b 79 72 6f 77 25 2f 32 | 29 0d 04 1a 1c 20 20 f2 |+yrow%/2|).... .|
|00000f10| 63 65 6e 74 72 65 28 22 | 20 22 2c 33 2b 79 72 6f |centre("| ",3+yro|
|00000f20| 77 25 2f 32 29 0d 04 24 | 07 20 20 f5 0d 04 2e 0c |w%/2)..$|. .....|
|00000f30| 20 20 20 20 47 24 3d be | 0d 04 38 2a 20 20 20 fd | G$=.|..8* .|
|00000f40| 20 47 24 3d 22 59 22 20 | 84 20 47 24 3d 22 79 22 | G$="Y" |. G$="y"|
|00000f50| 20 84 20 47 24 3d 22 6e | 22 20 84 20 47 24 3d 22 | . G$="n|" . G$="|
|00000f60| 4e 22 0d 04 42 37 20 20 | e7 20 47 24 3d 22 59 22 |N"..B7 |. G$="Y"|
|00000f70| 20 84 20 47 24 3d 22 79 | 22 20 73 61 66 65 63 6f | . G$="y|" safeco|
|00000f80| 72 6e 65 72 73 25 3d b9 | 20 8b 20 73 61 66 65 63 |rners%=.| . safec|
|00000f90| 6f 72 6e 65 72 73 25 3d | a3 0d 04 4c 06 20 cc 0d |orners%=|...L. ..|
|00000fa0| 04 56 14 20 20 73 61 66 | 65 63 6f 72 6e 65 72 73 |.V. saf|ecorners|
|00000fb0| 25 3d a3 0d 04 60 06 20 | cd 0d 04 6a 6a db 3a 87 |%=...`. |...jj.:.|
|00000fc0| 3a e6 30 2c 34 3a c8 93 | c8 90 78 6d 69 6e 2c 79 |:.0,4:..|..xmin,y|
|00000fd0| 6d 69 6e 2c 28 78 6d 61 | 78 2d 78 6d 69 6e 29 2c |min,(xma|x-xmin),|
|00000fe0| 28 79 6d 61 78 2d 79 6d | 69 6e 29 3a e6 30 2c 30 |(ymax-ym|in):.0,0|
|00000ff0| 3a f2 64 72 61 77 62 6f | 75 6e 64 61 72 69 65 73 |:.drawbo|undaries|
|00001000| 28 76 65 72 74 69 63 65 | 73 28 29 2c 6e 6f 5f 6f |(vertice|s(),no_o|
|00001010| 66 5f 70 6f 69 6e 74 73 | 25 2c 70 6f 69 6e 74 73 |f_points|%,points|
|00001020| 28 29 29 0d 04 74 72 de | 20 63 6f 6e 6e 65 63 74 |())..tr.| connect|
|00001030| 69 6f 6e 73 25 20 6e 6f | 5f 6f 66 5f 70 6f 69 6e |ions% no|_of_poin|
|00001040| 74 73 25 2a 28 6e 6f 5f | 6f 66 5f 70 6f 69 6e 74 |ts%*(no_|of_point|
|00001050| 73 25 2d 31 29 3a f2 63 | 6c 65 61 72 63 6f 6e 6e |s%-1):.c|learconn|
|00001060| 65 63 74 69 6f 6e 73 28 | 63 6f 6e 6e 65 63 74 69 |ections(|connecti|
|00001070| 6f 6e 73 25 2c 6e 6f 5f | 6f 66 5f 70 6f 69 6e 74 |ons%,no_|of_point|
|00001080| 73 25 2a 28 6e 6f 5f 6f | 66 5f 70 6f 69 6e 74 73 |s%*(no_o|f_points|
|00001090| 25 2d 31 29 29 0d 04 7e | 2e f2 73 65 74 75 70 63 |%-1))..~|..setupc|
|000010a0| 6f 6e 6e 65 63 74 69 6f | 6e 73 28 63 6f 6e 6e 65 |onnectio|ns(conne|
|000010b0| 63 74 69 6f 6e 73 25 2c | 76 65 72 74 69 63 65 73 |ctions%,|vertices|
|000010c0| 28 29 29 0d 04 88 1f de | 20 66 6c 61 67 73 62 6c |()).....| flagsbl|
|000010d0| 6f 63 6b 25 20 6e 6f 5f | 6f 66 5f 70 6f 69 6e 74 |ock% no_|of_point|
|000010e0| 73 25 0d 04 92 67 f2 70 | 6c 61 63 65 6d 69 6e 65 |s%...g.p|lacemine|
|000010f0| 73 28 66 6c 61 67 73 62 | 6c 6f 63 6b 25 2c 6e 6f |s(flagsb|lock%,no|
|00001100| 5f 6f 66 5f 70 6f 69 6e | 74 73 25 2c 76 65 72 74 |_of_poin|ts%,vert|
|00001110| 69 63 65 73 28 29 2c 73 | 61 66 65 63 6f 72 6e 65 |ices(),s|afecorne|
|00001120| 72 73 25 2c 6e 75 6d 62 | 65 72 5f 6f 66 5f 6d 69 |rs%,numb|er_of_mi|
|00001130| 6e 65 73 25 2c 78 6d 69 | 6e 2c 78 6d 61 78 2c 79 |nes%,xmi|n,xmax,y|
|00001140| 6d 69 6e 2c 79 6d 61 78 | 29 0d 04 9c 5a f2 69 6e |min,ymax|)...Z.in|
|00001150| 74 65 72 61 63 74 28 70 | 6f 69 6e 74 73 28 29 2c |teract(p|oints(),|
|00001160| 76 65 72 74 69 63 65 73 | 28 29 2c 6e 6f 5f 6f 66 |vertices|(),no_of|
|00001170| 5f 70 6f 69 6e 74 73 25 | 2c 63 6f 6e 6e 65 63 74 |_points%|,connect|
|00001180| 69 6f 6e 73 25 2c 66 6c | 61 67 73 62 6c 6f 63 6b |ions%,fl|agsblock|
|00001190| 25 2c 6e 75 6d 62 65 72 | 5f 6f 66 5f 6d 69 6e 65 |%,number|_of_mine|
|000011a0| 73 25 29 0d 04 a6 1a f5 | 20 c8 97 6d 78 25 2c 6d |s%).....| ..mx%,m|
|000011b0| 79 25 2c 6d 62 25 3a fd | 6d 62 25 3d 30 0d 04 b0 |y%,mb%:.|mb%=0...|
|000011c0| 1b f5 20 c8 97 6d 78 25 | 2c 6d 79 25 2c 6d 62 25 |.. ..mx%|,my%,mb%|
|000011d0| 3a fd 6d 62 25 3c 3e 30 | 0d 04 ba 1a f5 20 c8 97 |:.mb%<>0|..... ..|
|000011e0| 6d 78 25 2c 6d 79 25 2c | 6d 62 25 3a fd 6d 62 25 |mx%,my%,|mb%:.mb%|
|000011f0| 3d 30 0d 04 c4 05 f9 0d | 04 ce 05 e0 0d 04 d8 05 |=0......|........|
|00001200| 3a 0d 04 e2 11 dd 20 f2 | 73 65 74 63 6f 6c 6f 75 |:..... .|setcolou|
|00001210| 72 73 0d 04 ec 1c ea 20 | 68 69 67 68 5f 74 77 6f |rs..... |high_two|
|00001220| 5f 62 69 74 73 25 2c 63 | 6f 6c 6f 66 66 25 0d 04 |_bits%,c|oloff%..|
|00001230| f6 13 f4 31 36 20 63 6f | 6c 6f 75 72 20 6d 6f 64 |...16 co|lour mod|
|00001240| 65 0d 05 00 13 f4 68 69 | 67 68 5f 74 77 6f 5f 62 |e.....hi|gh_two_b|
|00001250| 69 74 73 3a 0d 05 0a 4c | f4 30 3d 73 70 65 63 69 |its:...L|.0=speci|
|00001260| 61 6c 2c 20 31 3d 67 65 | 6e 65 72 61 6c 2c 20 32 |al, 1=ge|neral, 2|
|00001270| 3d 63 75 72 72 65 6e 74 | 20 63 65 6c 6c 20 28 76 |=current| cell (v|
|00001280| 2e 62 72 69 67 68 74 29 | 2c 20 33 3d 73 75 72 72 |.bright)|, 3=surr|
|00001290| 6f 75 6e 64 69 6e 67 20 | 28 62 72 69 67 68 74 29 |ounding |(bright)|
|000012a0| 0d 05 14 12 f4 6c 6f 77 | 5f 74 77 6f 5f 62 69 74 |.....low|_two_bit|
|000012b0| 73 3a 0d 05 1e 4d f4 30 | 3d 75 6e 6b 6e 6f 77 6e |s:...M.0|=unknown|
|000012c0| 20 28 62 6c 75 65 29 2c | 20 31 3d 63 6c 65 61 72 | (blue),| 1=clear|
|000012d0| 65 64 20 28 67 72 65 65 | 6e 29 2c 20 32 3d 66 6c |ed (gree|n), 2=fl|
|000012e0| 61 67 67 65 64 20 28 72 | 65 64 29 2c 20 33 3d 71 |agged (r|ed), 3=q|
|000012f0| 75 65 72 69 65 64 20 28 | 6f 72 61 6e 67 65 29 0d |ueried (|orange).|
|00001300| 05 28 1a e3 20 68 69 67 | 68 5f 74 77 6f 5f 62 69 |.(.. hig|h_two_bi|
|00001310| 74 73 25 3d 31 20 b8 20 | 33 0d 05 32 19 20 20 c8 |ts%=1 . |3..2. .|
|00001320| 8e 20 68 69 67 68 5f 74 | 77 6f 5f 62 69 74 73 25 |. high_t|wo_bits%|
|00001330| 20 ca 0d 05 3c 15 20 20 | 20 20 c9 20 31 3a 63 6f | ...<. | . 1:co|
|00001340| 6c 6f 66 66 25 3d 30 0d | 05 46 15 20 20 20 20 c9 |loff%=0.|.F. .|
|00001350| 20 32 3a 63 6f 6c 6f 66 | 66 25 3d 32 0d 05 50 15 | 2:colof|f%=2..P.|
|00001360| 20 20 20 20 c9 20 33 3a | 63 6f 6c 6f 66 66 25 3d | . 3:|coloff%=|
|00001370| 31 0d 05 5a 08 20 20 20 | cb 0d 05 64 2d 20 20 fb |1..Z. |...d- .|
|00001380| 68 69 67 68 5f 74 77 6f | 5f 62 69 74 73 25 3c 3c |high_two|_bits%<<|
|00001390| 32 2c 30 2c 30 2c 26 35 | 35 2b 28 63 6f 6c 6f 66 |2,0,0,&5|5+(colof|
|000013a0| 66 25 3c 3c 35 29 0d 05 | 6e 31 20 20 fb 31 2b 28 |f%<<5)..|n1 .1+(|
|000013b0| 68 69 67 68 5f 74 77 6f | 5f 62 69 74 73 25 3c 3c |high_two|_bits%<<|
|000013c0| 32 29 2c 30 2c 26 34 34 | 2b 28 63 6f 6c 6f 66 66 |2),0,&44|+(coloff|
|000013d0| 25 3c 3c 35 29 2c 30 0d | 05 78 43 20 20 fb 32 2b |%<<5),0.|.xC .2+|
|000013e0| 28 68 69 67 68 5f 74 77 | 6f 5f 62 69 74 73 25 3c |(high_tw|o_bits%<|
|000013f0| 3c 32 29 2c 31 32 37 2b | 28 63 6f 6c 6f 66 66 25 |<2),127+|(coloff%|
|00001400| 3c 3c 35 29 2c 63 6f 6c | 6f 66 66 25 3c 3c 34 2c |<<5),col|off%<<4,|
|00001410| 63 6f 6c 6f 66 66 25 3c | 3c 34 0d 05 82 47 20 20 |coloff%<|<4...G |
|00001420| fb 33 2b 28 68 69 67 68 | 5f 74 77 6f 5f 62 69 74 |.3+(high|_two_bit|
|00001430| 73 25 3c 3c 32 29 2c 39 | 35 2b 28 63 6f 6c 6f 66 |s%<<2),9|5+(colof|
|00001440| 66 25 3c 3c 35 29 2c 36 | 33 2b 28 63 6f 6c 6f 66 |f%<<5),6|3+(colof|
|00001450| 66 25 3c 3c 34 29 2c 63 | 6f 6c 6f 66 66 25 3c 3c |f%<<4),c|oloff%<<|
|00001460| 34 0d 05 8c 06 20 ed 0d | 05 96 0d f4 73 70 65 63 |4.... ..|....spec|
|00001470| 69 61 6c 3a 0d 05 a0 40 | f4 30 3d 62 6c 61 63 6b |ial:...@|.0=black|
|00001480| 20 2d 20 62 6f 75 6e 64 | 61 72 69 65 73 2c 20 31 | - bound|aries, 1|
|00001490| 3d 77 68 69 74 65 20 28 | 74 65 78 74 29 2c 20 32 |=white (|text), 2|
|000014a0| 3d 66 6c 61 73 68 69 6e | 67 20 72 65 64 20 28 6d |=flashin|g red (m|
|000014b0| 69 6e 65 29 0d 05 aa 0c | fb 30 2c 30 2c 30 2c 30 |ine)....|.0,0,0,0|
|000014c0| 0d 05 b4 12 fb 31 2c 32 | 35 35 2c 32 35 35 2c 32 |.....1,2|55,255,2|
|000014d0| 35 35 0d 05 be 14 ef 31 | 39 2c 32 2c 31 37 2c 32 |55.....1|9,2,17,2|
|000014e0| 35 35 2c 30 2c 30 0d 05 | c8 14 ef 31 39 2c 32 2c |55,0,0..|...19,2,|
|000014f0| 31 38 2c 31 32 38 2c 30 | 2c 30 0d 05 d2 12 fb 33 |18,128,0|,0.....3|
|00001500| 2c 31 39 32 2c 31 39 32 | 2c 31 39 32 0d 05 dc 05 |,192,192|,192....|
|00001510| e1 0d 05 e6 05 3a 0d 05 | f0 32 dd 20 f2 73 65 74 |.....:..|.2. .set|
|00001520| 62 6f 75 6e 64 61 72 69 | 65 73 28 64 65 73 74 28 |boundari|es(dest(|
|00001530| 29 2c 6c 65 66 74 2c 72 | 69 67 68 74 2c 62 6f 74 |),left,r|ight,bot|
|00001540| 74 6f 6d 2c 74 6f 70 29 | 0d 05 fa 2b 64 65 73 74 |tom,top)|...+dest|
|00001550| 28 31 2c 30 29 3d 31 3a | 64 65 73 74 28 31 2c 31 |(1,0)=1:|dest(1,1|
|00001560| 29 3d 30 3a 64 65 73 74 | 28 31 2c 32 29 3d 2d 6c |)=0:dest|(1,2)=-l|
|00001570| 65 66 74 0d 06 04 2c 64 | 65 73 74 28 32 2c 30 29 |eft...,d|est(2,0)|
|00001580| 3d 31 3a 64 65 73 74 28 | 32 2c 31 29 3d 30 3a 64 |=1:dest(|2,1)=0:d|
|00001590| 65 73 74 28 32 2c 32 29 | 3d 2d 72 69 67 68 74 0d |est(2,2)|=-right.|
|000015a0| 06 0e 2d 64 65 73 74 28 | 33 2c 30 29 3d 30 3a 64 |..-dest(|3,0)=0:d|
|000015b0| 65 73 74 28 33 2c 31 29 | 3d 31 3a 64 65 73 74 28 |est(3,1)|=1:dest(|
|000015c0| 33 2c 32 29 3d 2d 62 6f | 74 74 6f 6d 0d 06 18 2a |3,2)=-bo|ttom...*|
|000015d0| 64 65 73 74 28 34 2c 30 | 29 3d 30 3a 64 65 73 74 |dest(4,0|)=0:dest|
|000015e0| 28 34 2c 31 29 3d 31 3a | 64 65 73 74 28 34 2c 32 |(4,1)=1:|dest(4,2|
|000015f0| 29 3d 2d 74 6f 70 0d 06 | 22 05 e1 0d 06 2c 05 3a |)=-top..|"....,.:|
|00001600| 0d 06 36 42 dd 20 f2 70 | 6c 61 63 65 70 6f 69 6e |..6B. .p|lacepoin|
|00001610| 74 73 28 70 6f 69 6e 74 | 73 28 29 2c 6e 6f 25 2c |ts(point|s(),no%,|
|00001620| 6c 65 66 74 2c 72 69 67 | 68 74 2c 74 6f 70 2c 62 |left,rig|ht,top,b|
|00001630| 6f 74 74 6f 6d 2c 64 69 | 73 74 2c 62 6f 72 64 65 |ottom,di|st,borde|
|00001640| 72 29 0d 06 40 16 ea 20 | 6d 25 2c 6e 25 2c 74 6f |r)..@.. |m%,n%,to|
|00001650| 6f 5f 63 6c 6f 73 65 25 | 0d 06 4a 08 6d 25 3d 30 |o_close%|..J.m%=0|
|00001660| 0d 06 54 10 74 6f 6f 5f | 63 6c 6f 73 65 25 3d a3 |..T.too_|close%=.|
|00001670| 0d 06 5e 05 f5 0d 06 68 | 0b 20 20 6d 25 2b 3d 31 |..^....h|. m%+=1|
|00001680| 0d 06 72 34 20 20 70 6f | 69 6e 74 73 28 6d 25 2c |..r4 po|ints(m%,|
|00001690| 30 29 3d b3 28 31 29 2a | 28 72 69 67 68 74 2d 6c |0)=.(1)*|(right-l|
|000016a0| 65 66 74 2d 62 6f 72 64 | 65 72 2a 32 29 2b 62 6f |eft-bord|er*2)+bo|
|000016b0| 72 64 65 72 0d 06 7c 34 | 20 20 70 6f 69 6e 74 73 |rder..|4| points|
|000016c0| 28 6d 25 2c 31 29 3d b3 | 28 31 29 2a 28 74 6f 70 |(m%,1)=.|(1)*(top|
|000016d0| 2d 62 6f 74 74 6f 6d 2d | 62 6f 72 64 65 72 2a 32 |-bottom-|border*2|
|000016e0| 29 2b 62 6f 72 64 65 72 | 0d 06 86 0a 20 20 6e 25 |)+border|.... n%|
|000016f0| 3d 31 0d 06 90 1e 20 20 | c8 95 20 6e 25 3c 6d 25 |=1.... |.. n%<m%|
|00001700| 20 80 20 ac 28 74 6f 6f | 5f 63 6c 6f 73 65 25 29 | . .(too|_close%)|
|00001710| 0d 06 9a 68 20 20 20 20 | e7 20 28 28 70 6f 69 6e |...h |. ((poin|
|00001720| 74 73 28 6e 25 2c 30 29 | 2d 70 6f 69 6e 74 73 28 |ts(n%,0)|-points(|
|00001730| 6d 25 2c 30 29 29 5e 32 | 29 2b 28 28 70 6f 69 6e |m%,0))^2|)+((poin|
|00001740| 74 73 28 6e 25 2c 31 29 | 2d 70 6f 69 6e 74 73 28 |ts(n%,1)|-points(|
|00001750| 6d 25 2c 31 29 29 5e 32 | 29 3c 6d 69 6e 5f 64 69 |m%,1))^2|)<min_di|
|00001760| 73 74 2a 6d 69 6e 5f 64 | 69 73 74 20 74 6f 6f 5f |st*min_d|ist too_|
|00001770| 63 6c 6f 73 65 25 3d b9 | 0d 06 a4 0d 20 20 20 20 |close%=.|.... |
|00001780| 6e 25 2b 3d 31 0d 06 ae | 08 20 20 20 ce 0d 06 b8 |n%+=1...|. ....|
|00001790| 24 20 20 e7 20 74 6f 6f | 5f 63 6c 6f 73 65 25 20 |$ . too|_close% |
|000017a0| 6d 25 3d 30 3a 74 6f 6f | 5f 63 6c 6f 73 65 25 3d |m%=0:too|_close%=|
|000017b0| a3 0d 06 c2 0d 20 fd 20 | 6d 25 3d 6e 6f 25 0d 06 |..... . |m%=no%..|
|000017c0| cc 05 e1 0d 06 d6 05 3a | 0d 06 e0 1c dd 20 f2 70 |.......:|..... .p|
|000017d0| 6c 6f 74 70 6f 69 6e 74 | 73 28 70 74 73 28 29 2c |lotpoint|s(pts(),|
|000017e0| 6e 6f 25 29 0d 06 ea 08 | ea 20 6e 25 0d 06 f4 0f |no%)....|. n%....|
|000017f0| e3 6e 25 3d 31 20 b8 20 | 6e 6f 25 0d 06 fe 1b 20 |.n%=1 . |no%.... |
|00001800| 20 c8 92 70 74 73 28 6e | 25 2c 30 29 2c 70 74 73 | ..pts(n|%,0),pts|
|00001810| 28 6e 25 2c 31 29 0d 07 | 08 06 20 ed 0d 07 12 05 |(n%,1)..|.. .....|
|00001820| e1 0d 07 1c 05 3a 0d 07 | 26 2b dd 20 f2 70 6c 6f |.....:..|&+. .plo|
|00001830| 74 6c 69 6e 65 28 6c 69 | 6e 65 28 29 2c 78 6d 69 |tline(li|ne(),xmi|
|00001840| 6e 2c 78 6d 61 78 2c 79 | 6d 69 6e 2c 79 6d 61 78 |n,xmax,y|min,ymax|
|00001850| 29 0d 07 30 09 ea 20 69 | 6e 74 0d 07 3a 1d e7 20 |)..0.. i|nt..:.. |
|00001860| 94 28 6c 69 6e 65 28 31 | 29 29 3e 94 28 6c 69 6e |.(line(1|))>.(lin|
|00001870| 65 28 30 29 29 20 8c 0d | 07 44 1c 20 20 f4 20 6d |e(0)) ..|.D. . m|
|00001880| 6f 72 65 20 68 6f 72 69 | 7a 6f 6e 74 61 6c 20 6c |ore hori|zontal l|
|00001890| 69 6e 65 0d 07 4e 29 20 | 20 69 6e 74 3d 2d 28 78 |ine..N) | int=-(x|
|000018a0| 6d 69 6e 2a 6c 69 6e 65 | 28 30 29 2b 6c 69 6e 65 |min*line|(0)+line|
|000018b0| 28 32 29 29 2f 6c 69 6e | 65 28 31 29 0d 07 58 27 |(2))/lin|e(1)..X'|
|000018c0| 20 20 e7 20 69 6e 74 3c | 28 79 6d 69 6e 2d 38 30 | . int<|(ymin-80|
|000018d0| 29 20 84 20 69 6e 74 3e | 28 79 6d 61 78 2b 37 39 |) . int>|(ymax+79|
|000018e0| 29 20 8c 0d 07 62 60 20 | 20 20 20 e7 20 69 6e 74 |) ...b` | . int|
|000018f0| 3c 79 6d 69 6e 20 ec 2d | 28 79 6d 69 6e 2a 6c 69 |<ymin .-|(ymin*li|
|00001900| 6e 65 28 31 29 2b 6c 69 | 6e 65 28 32 29 29 2f 6c |ne(1)+li|ne(2))/l|
|00001910| 69 6e 65 28 30 29 2c 79 | 6d 69 6e 20 8b 20 ec 2d |ine(0),y|min . .-|
|00001920| 28 79 6d 61 78 2a 6c 69 | 6e 65 28 31 29 2b 6c 69 |(ymax*li|ne(1)+li|
|00001930| 6e 65 28 32 29 29 2f 6c | 69 6e 65 28 30 29 2c 79 |ne(2))/l|ine(0),y|
|00001940| 6d 61 78 0d 07 6c 08 20 | 20 20 cc 0d 07 76 11 20 |max..l. | ...v. |
|00001950| 20 20 20 ec 78 6d 69 6e | 2c 69 6e 74 0d 07 80 08 | .xmin|,int....|
|00001960| 20 20 20 cd 0d 07 8a 29 | 20 20 69 6e 74 3d 2d 28 | ....)| int=-(|
|00001970| 78 6d 61 78 2a 6c 69 6e | 65 28 30 29 2b 6c 69 6e |xmax*lin|e(0)+lin|
|00001980| 65 28 32 29 29 2f 6c 69 | 6e 65 28 31 29 0d 07 94 |e(2))/li|ne(1)...|
|00001990| 1d 20 20 e7 20 69 6e 74 | 3c 79 6d 69 6e 20 84 20 |. . int|<ymin . |
|000019a0| 69 6e 74 3e 79 6d 61 78 | 20 8c 0d 07 9e 60 20 20 |int>ymax| ....` |
|000019b0| 20 20 e7 20 69 6e 74 3c | 79 6d 69 6e 20 df 2d 28 | . int<|ymin .-(|
|000019c0| 79 6d 69 6e 2a 6c 69 6e | 65 28 31 29 2b 6c 69 6e |ymin*lin|e(1)+lin|
|000019d0| 65 28 32 29 29 2f 6c 69 | 6e 65 28 30 29 2c 79 6d |e(2))/li|ne(0),ym|
|000019e0| 69 6e 20 8b 20 df 2d 28 | 79 6d 61 78 2a 6c 69 6e |in . .-(|ymax*lin|
|000019f0| 65 28 31 29 2b 6c 69 6e | 65 28 32 29 29 2f 6c 69 |e(1)+lin|e(2))/li|
|00001a00| 6e 65 28 30 29 2c 79 6d | 61 78 0d 07 a8 08 20 20 |ne(0),ym|ax.... |
|00001a10| 20 cc 0d 07 b2 11 20 20 | 20 20 df 78 6d 61 78 2c | ..... | .xmax,|
|00001a20| 69 6e 74 0d 07 bc 08 20 | 20 20 cd 0d 07 c6 06 20 |int.... | ..... |
|00001a30| cc 0d 07 d0 1a 20 20 f4 | 20 6d 6f 72 65 20 76 65 |..... .| more ve|
|00001a40| 72 74 69 63 61 6c 20 6c | 69 6e 65 0d 07 da 29 20 |rtical l|ine...) |
|00001a50| 20 69 6e 74 3d 2d 28 79 | 6d 69 6e 2a 6c 69 6e 65 | int=-(y|min*line|
|00001a60| 28 31 29 2b 6c 69 6e 65 | 28 32 29 29 2f 6c 69 6e |(1)+line|(2))/lin|
|00001a70| 65 28 30 29 0d 07 e4 1d | 20 20 e7 20 69 6e 74 3c |e(0)....| . int<|
|00001a80| 78 6d 69 6e 20 84 20 69 | 6e 74 3e 78 6d 61 78 20 |xmin . i|nt>xmax |
|00001a90| 8c 0d 07 ee 60 20 20 20 | 20 e7 20 69 6e 74 3c 78 |....` | . int<x|
|00001aa0| 6d 69 6e 20 ec 78 6d 69 | 6e 2c 2d 28 78 6d 69 6e |min .xmi|n,-(xmin|
|00001ab0| 2a 6c 69 6e 65 28 30 29 | 2b 6c 69 6e 65 28 32 29 |*line(0)|+line(2)|
|00001ac0| 29 2f 6c 69 6e 65 28 31 | 29 20 8b 20 ec 78 6d 61 |)/line(1|) . .xma|
|00001ad0| 78 2c 2d 28 78 6d 61 78 | 2a 6c 69 6e 65 28 30 29 |x,-(xmax|*line(0)|
|00001ae0| 2b 6c 69 6e 65 28 32 29 | 29 2f 6c 69 6e 65 28 31 |+line(2)|)/line(1|
|00001af0| 29 0d 07 f8 08 20 20 20 | cc 0d 08 02 11 20 20 20 |).... |..... |
|00001b00| 20 ec 69 6e 74 2c 79 6d | 69 6e 0d 08 0c 08 20 20 | .int,ym|in.... |
|00001b10| 20 cd 0d 08 16 29 20 20 | 69 6e 74 3d 2d 28 79 6d | ....) |int=-(ym|
|00001b20| 61 78 2a 6c 69 6e 65 28 | 31 29 2b 6c 69 6e 65 28 |ax*line(|1)+line(|
|00001b30| 32 29 29 2f 6c 69 6e 65 | 28 30 29 0d 08 20 1d 20 |2))/line|(0).. . |
|00001b40| 20 e7 20 69 6e 74 3c 78 | 6d 69 6e 20 84 20 69 6e | . int<x|min . in|
|00001b50| 74 3e 78 6d 61 78 20 8c | 0d 08 2a 60 20 20 20 20 |t>xmax .|..*` |
|00001b60| e7 20 69 6e 74 3c 78 6d | 69 6e 20 df 78 6d 69 6e |. int<xm|in .xmin|
|00001b70| 2c 2d 28 78 6d 69 6e 2a | 6c 69 6e 65 28 30 29 2b |,-(xmin*|line(0)+|
|00001b80| 6c 69 6e 65 28 32 29 29 | 2f 6c 69 6e 65 28 31 29 |line(2))|/line(1)|
|00001b90| 20 8b 20 df 78 6d 61 78 | 2c 2d 28 78 6d 61 78 2a | . .xmax|,-(xmax*|
|00001ba0| 6c 69 6e 65 28 30 29 2b | 6c 69 6e 65 28 32 29 29 |line(0)+|line(2))|
|00001bb0| 2f 6c 69 6e 65 28 31 29 | 0d 08 34 08 20 20 20 cc |/line(1)|..4. .|
|00001bc0| 0d 08 3e 11 20 20 20 20 | df 69 6e 74 2c 79 6d 61 |..>. |.int,yma|
|00001bd0| 78 0d 08 48 08 20 20 20 | cd 0d 08 52 06 20 cd 0d |x..H. |...R. ..|
|00001be0| 08 5c 05 e1 0d 08 66 05 | 3a 0d 08 70 40 dd 20 f2 |.\....f.|:..p@. .|
|00001bf0| 6c 69 6e 65 66 72 6f 6d | 70 6f 69 6e 74 73 28 6c |linefrom|points(l|
|00001c00| 69 6e 28 29 2c 70 74 73 | 28 29 2c 69 6e 64 65 78 |in(),pts|(),index|
|00001c10| 31 25 2c 69 6e 64 65 78 | 32 25 2c 6e 70 74 73 25 |1%,index|2%,npts%|
|00001c20| 2c 65 64 67 65 73 28 29 | 29 0d 08 7a 0a c8 8e 20 |,edges()|)..z... |
|00001c30| b9 20 ca 0d 08 84 6e 20 | c9 20 69 6e 64 65 78 31 |. ....n |. index1|
|00001c40| 25 3e 6e 70 74 73 25 3a | 6c 69 6e 28 30 29 3d 65 |%>npts%:|lin(0)=e|
|00001c50| 64 67 65 73 28 69 6e 64 | 65 78 31 25 2d 6e 70 74 |dges(ind|ex1%-npt|
|00001c60| 73 25 2c 30 29 3a 6c 69 | 6e 28 31 29 3d 65 64 67 |s%,0):li|n(1)=edg|
|00001c70| 65 73 28 69 6e 64 65 78 | 31 25 2d 6e 70 74 73 25 |es(index|1%-npts%|
|00001c80| 2c 31 29 3a 6c 69 6e 28 | 32 29 3d 65 64 67 65 73 |,1):lin(|2)=edges|
|00001c90| 28 69 6e 64 65 78 31 25 | 2d 6e 70 74 73 25 2c 32 |(index1%|-npts%,2|
|00001ca0| 29 0d 08 8e 6e 20 c9 20 | 69 6e 64 65 78 32 25 3e |)...n . |index2%>|
|00001cb0| 6e 70 74 73 25 3a 6c 69 | 6e 28 30 29 3d 65 64 67 |npts%:li|n(0)=edg|
|00001cc0| 65 73 28 69 6e 64 65 78 | 32 25 2d 6e 70 74 73 25 |es(index|2%-npts%|
|00001cd0| 2c 30 29 3a 6c 69 6e 28 | 31 29 3d 65 64 67 65 73 |,0):lin(|1)=edges|
|00001ce0| 28 69 6e 64 65 78 32 25 | 2d 6e 70 74 73 25 2c 31 |(index2%|-npts%,1|
|00001cf0| 29 3a 6c 69 6e 28 32 29 | 3d 65 64 67 65 73 28 69 |):lin(2)|=edges(i|
|00001d00| 6e 64 65 78 32 25 2d 6e | 70 74 73 25 2c 32 29 0d |ndex2%-n|pts%,2).|
|00001d10| 08 98 b2 20 7f 3a 6c 69 | 6e 28 30 29 3d 70 74 73 |... .:li|n(0)=pts|
|00001d20| 28 69 6e 64 65 78 32 25 | 2c 30 29 2d 70 74 73 28 |(index2%|,0)-pts(|
|00001d30| 69 6e 64 65 78 31 25 2c | 30 29 3a 6c 69 6e 28 31 |index1%,|0):lin(1|
|00001d40| 29 3d 70 74 73 28 69 6e | 64 65 78 32 25 2c 31 29 |)=pts(in|dex2%,1)|
|00001d50| 2d 70 74 73 28 69 6e 64 | 65 78 31 25 2c 31 29 3a |-pts(ind|ex1%,1):|
|00001d60| 6c 69 6e 28 32 29 3d 2d | 28 28 6c 69 6e 28 30 29 |lin(2)=-|((lin(0)|
|00001d70| 2a 28 70 74 73 28 69 6e | 64 65 78 31 25 2c 30 29 |*(pts(in|dex1%,0)|
|00001d80| 2b 70 74 73 28 69 6e 64 | 65 78 32 25 2c 30 29 29 |+pts(ind|ex2%,0))|
|00001d90| 29 2f 32 29 2d 28 28 6c | 69 6e 28 31 29 2a 28 70 |)/2)-((l|in(1)*(p|
|00001da0| 74 73 28 69 6e 64 65 78 | 31 25 2c 31 29 2b 70 74 |ts(index|1%,1)+pt|
|00001db0| 73 28 69 6e 64 65 78 32 | 25 2c 31 29 29 2f 32 29 |s(index2|%,1))/2)|
|00001dc0| 29 0d 08 a2 06 20 cb 0d | 08 ac 05 e1 0d 08 b6 05 |).... ..|........|
|00001dd0| 3a 0d 08 c0 29 dd 20 a4 | 69 6e 74 65 72 73 65 63 |:...). .|intersec|
|00001de0| 74 28 70 6f 69 6e 74 28 | 29 2c 6c 69 6e 65 31 28 |t(point(|),line1(|
|00001df0| 29 2c 6c 69 6e 65 32 28 | 29 29 0d 08 ca 0d ea 20 |),line2(|))..... |
|00001e00| 64 69 76 69 73 6f 72 0d | 08 d4 2f 64 69 76 69 73 |divisor.|../divis|
|00001e10| 6f 72 3d 6c 69 6e 65 32 | 28 30 29 2a 6c 69 6e 65 |or=line2|(0)*line|
|00001e20| 31 28 31 29 2d 6c 69 6e | 65 31 28 30 29 2a 6c 69 |1(1)-lin|e1(0)*li|
|00001e30| 6e 65 32 28 31 29 0d 08 | de 1d e7 20 64 69 76 69 |ne2(1)..|... divi|
|00001e40| 73 6f 72 3d 30 20 8c 20 | 3d a3 3a f4 20 66 61 69 |sor=0 . |=.:. fai|
|00001e50| 6c 65 64 0d 08 e8 3a 70 | 6f 69 6e 74 28 31 29 3d |led...:p|oint(1)=|
|00001e60| 28 6c 69 6e 65 31 28 30 | 29 2a 6c 69 6e 65 32 28 |(line1(0|)*line2(|
|00001e70| 32 29 2d 6c 69 6e 65 32 | 28 30 29 2a 6c 69 6e 65 |2)-line2|(0)*line|
|00001e80| 31 28 32 29 29 2f 64 69 | 76 69 73 6f 72 0d 08 f2 |1(2))/di|visor...|
|00001e90| 13 e7 20 6c 69 6e 65 31 | 28 30 29 3c 3e 30 20 8c |.. line1|(0)<>0 .|
|00001ea0| 0d 08 fc 35 20 20 70 6f | 69 6e 74 28 30 29 3d 2d |...5 po|int(0)=-|
|00001eb0| 28 6c 69 6e 65 31 28 31 | 29 2a 70 6f 69 6e 74 28 |(line1(1|)*point(|
|00001ec0| 31 29 2b 6c 69 6e 65 31 | 28 32 29 29 2f 6c 69 6e |1)+line1|(2))/lin|
|00001ed0| 65 31 28 30 29 0d 09 06 | 06 20 cc 0d 09 10 35 20 |e1(0)...|. ....5 |
|00001ee0| 20 70 6f 69 6e 74 28 30 | 29 3d 2d 28 6c 69 6e 65 | point(0|)=-(line|
|00001ef0| 32 28 31 29 2a 70 6f 69 | 6e 74 28 31 29 2b 6c 69 |2(1)*poi|nt(1)+li|
|00001f00| 6e 65 32 28 32 29 29 2f | 6c 69 6e 65 32 28 30 29 |ne2(2))/|line2(0)|
|00001f10| 0d 09 1a 06 20 cd 0d 09 | 24 10 3d b9 3a f4 20 73 |.... ...|$.=.:. s|
|00001f20| 75 63 63 65 73 73 0d 09 | 2e 05 3a 0d 09 38 1b dd |uccess..|..:..8..|
|00001f30| 20 a4 65 76 61 6c 6c 69 | 6e 65 28 6c 69 6e 65 28 | .evalli|ne(line(|
|00001f40| 29 2c 78 2c 79 29 0d 09 | 42 20 3d 6c 69 6e 65 28 |),x,y)..|B =line(|
|00001f50| 30 29 2a 78 2b 6c 69 6e | 65 28 31 29 2a 79 2b 6c |0)*x+lin|e(1)*y+l|
|00001f60| 69 6e 65 28 32 29 0d 09 | 4c 05 3a 0d 09 56 25 dd |ine(2)..|L.:..V%.|
|00001f70| 20 f2 63 6c 65 61 72 63 | 6f 6e 6e 65 63 74 69 6f | .clearc|onnectio|
|00001f80| 6e 73 28 62 6c 6f 63 6b | 25 2c 73 69 7a 65 25 29 |ns(block|%,size%)|
|00001f90| 0d 09 60 08 ea 20 6e 25 | 0d 09 6a 13 e3 6e 25 3d |..`.. n%|..j..n%=|
|00001fa0| 30 20 b8 20 73 69 7a 65 | 25 2d 31 0d 09 74 11 20 |0 . size|%-1..t. |
|00001fb0| 20 62 6c 6f 63 6b 25 3f | 6e 25 3d 30 0d 09 7e 06 | block%?|n%=0..~.|
|00001fc0| 20 ed 0d 09 88 05 e1 0d | 09 92 05 3a 0d 09 9c 38 | .......|...:...8|
|00001fd0| dd 20 a4 63 65 6c 6c 63 | 6f 6e 6e 65 63 74 28 73 |. .cellc|onnect(s|
|00001fe0| 65 74 25 2c 76 61 6c 25 | 2c 63 6f 6e 6e 65 63 74 |et%,val%|,connect|
|00001ff0| 31 25 2c 63 6f 6e 6e 65 | 63 74 32 25 2c 74 61 62 |1%,conne|ct2%,tab|
|00002000| 6c 65 25 29 0d 09 a6 0e | ea 20 61 64 64 72 65 73 |le%)....|. addres|
|00002010| 73 25 0d 09 b0 3b e7 20 | 63 6f 6e 6e 65 63 74 31 |s%...;. |connect1|
|00002020| 25 3d 63 6f 6e 6e 65 63 | 74 32 25 20 8c 20 3d 30 |%=connec|t2% . =0|
|00002030| 3a f4 20 73 68 6f 75 6c | 64 20 6e 65 76 65 72 20 |:. shoul|d never |
|00002040| 68 61 70 70 65 6e 20 61 | 6e 79 77 61 79 0d 09 ba |happen a|nyway...|
|00002050| 30 e7 20 63 6f 6e 6e 65 | 63 74 31 25 3e 63 6f 6e |0. conne|ct1%>con|
|00002060| 6e 65 63 74 32 25 20 c8 | 94 20 63 6f 6e 6e 65 63 |nect2% .|. connec|
|00002070| 74 31 25 2c 63 6f 6e 6e | 65 63 74 32 25 0d 09 c4 |t1%,conn|ect2%...|
|00002080| 42 61 64 64 72 65 73 73 | 25 3d 74 61 62 6c 65 25 |Baddress|%=table%|
|00002090| 2b 28 28 28 63 6f 6e 6e | 65 63 74 32 25 2d 31 29 |+(((conn|ect2%-1)|
|000020a0| 2a 28 63 6f 6e 6e 65 63 | 74 32 25 2d 32 29 29 3e |*(connec|t2%-2))>|
|000020b0| 3e 31 29 2b 63 6f 6e 6e | 65 63 74 31 25 2d 31 0d |>1)+conn|ect1%-1.|
|000020c0| 09 ce 1b e7 20 73 65 74 | 25 20 8c 20 3f 61 64 64 |.... set|% . ?add|
|000020d0| 72 65 73 73 25 3d 76 61 | 6c 25 0d 09 d8 0e 3d 3f |ress%=va|l%....=?|
|000020e0| 61 64 64 72 65 73 73 25 | 0d 09 e2 05 3a 0d 09 ec |address%|....:...|
|000020f0| 2b dd 20 f2 73 65 74 75 | 70 63 6f 6e 6e 65 63 74 |+. .setu|pconnect|
|00002100| 69 6f 6e 73 28 63 6f 6e | 74 61 62 25 2c 76 65 72 |ions(con|tab%,ver|
|00002110| 74 69 63 65 73 28 29 29 | 0d 09 f6 28 ea 76 65 72 |tices())|...(.ver|
|00002120| 74 65 78 25 2c 73 65 61 | 72 63 68 76 65 72 74 65 |tex%,sea|rchverte|
|00002130| 78 25 2c 74 6d 70 25 2c | 61 63 63 75 72 61 63 79 |x%,tmp%,|accuracy|
|00002140| 0d 0a 00 11 61 63 63 75 | 72 61 63 79 3d 2e 30 30 |....accu|racy=.00|
|00002150| 31 0d 0a 0a 0d 76 65 72 | 74 65 78 25 3d 32 0d 0a |1....ver|tex%=2..|
|00002160| 14 1c c8 95 76 65 72 74 | 69 63 65 73 28 76 65 72 |....vert|ices(ver|
|00002170| 74 65 78 25 2c 32 29 3c | 3e 30 0d 0a 1e 22 20 20 |tex%,2)<|>0..." |
|00002180| e3 73 65 61 72 63 68 76 | 65 72 74 65 78 25 3d 31 |.searchv|ertex%=1|
|00002190| 20 b8 20 76 65 72 74 65 | 78 25 2d 31 0d 0a 28 81 | . verte|x%-1..(.|
|000021a0| 20 20 20 20 e7 20 94 28 | 76 65 72 74 69 63 65 73 | . .(|vertices|
|000021b0| 28 76 65 72 74 65 78 25 | 2c 30 29 2d 76 65 72 74 |(vertex%|,0)-vert|
|000021c0| 69 63 65 73 28 73 65 61 | 72 63 68 76 65 72 74 65 |ices(sea|rchverte|
|000021d0| 78 25 2c 30 29 29 3c 61 | 63 63 75 72 61 63 79 20 |x%,0))<a|ccuracy |
|000021e0| 80 20 94 28 76 65 72 74 | 69 63 65 73 28 76 65 72 |. .(vert|ices(ver|
|000021f0| 74 65 78 25 2c 31 29 2d | 76 65 72 74 69 63 65 73 |tex%,1)-|vertices|
|00002200| 28 73 65 61 72 63 68 76 | 65 72 74 65 78 25 2c 31 |(searchv|ertex%,1|
|00002210| 29 29 3c 61 63 63 75 72 | 61 63 79 20 8c 0d 0a 32 |))<accur|acy ...2|
|00002220| 58 20 20 20 20 20 20 74 | 6d 70 25 3d a4 63 65 6c |X t|mp%=.cel|
|00002230| 6c 63 6f 6e 6e 65 63 74 | 28 b9 2c 32 35 35 2c 76 |lconnect|(.,255,v|
|00002240| 65 72 74 69 63 65 73 28 | 73 65 61 72 63 68 76 65 |ertices(|searchve|
|00002250| 72 74 65 78 25 2c 32 29 | 2c 76 65 72 74 69 63 65 |rtex%,2)|,vertice|
|00002260| 73 28 76 65 72 74 65 78 | 25 2c 32 29 2c 63 6f 6e |s(vertex|%,2),con|
|00002270| 74 61 62 25 29 0d 0a 3c | 0a 20 20 20 20 20 cd 0d |tab%)..<|. ..|
|00002280| 0a 46 08 20 20 20 ed 0d | 0a 50 10 20 20 76 65 72 |.F. ..|.P. ver|
|00002290| 74 65 78 25 2b 3d 31 0d | 0a 5a 06 20 ce 0d 0a 64 |tex%+=1.|.Z. ...d|
|000022a0| 05 e1 0d 0a 6e 05 3a 0d | 0a 78 59 dd 20 f2 70 6c |....n.:.|.xY. .pl|
|000022b0| 61 63 65 6d 69 6e 65 73 | 28 6d 69 6e 65 6c 69 73 |acemines|(minelis|
|000022c0| 74 25 2c 6e 70 74 73 25 | 2c 76 65 72 74 69 63 65 |t%,npts%|,vertice|
|000022d0| 73 28 29 2c 63 6f 72 6e | 65 72 73 5f 73 61 66 65 |s(),corn|ers_safe|
|000022e0| 25 2c 6e 6d 69 6e 65 73 | 25 2c 6c 65 66 74 2c 72 |%,nmines|%,left,r|
|000022f0| 69 67 68 74 2c 62 6f 74 | 74 6f 6d 2c 74 6f 70 29 |ight,bot|tom,top)|
|00002300| 0d 0a 82 31 ea 20 63 65 | 6c 6c 25 2c 6f 6b 61 79 |...1. ce|ll%,okay|
|00002310| 5f 63 65 6c 6c 25 2c 74 | 65 73 74 76 65 72 74 65 |_cell%,t|estverte|
|00002320| 78 25 2c 61 63 63 75 72 | 61 63 79 2c 6d 69 6e 65 |x%,accur|acy,mine|
|00002330| 25 0d 0a 8c 11 61 63 63 | 75 72 61 63 79 3d 2e 30 |%....acc|uracy=.0|
|00002340| 30 31 0d 0a 96 24 f4 20 | 6e 6d 69 6e 65 73 25 3c |01...$. |nmines%<|
|00002350| 3d 6e 70 74 73 25 2b 34 | 2a 63 6f 72 6e 65 72 73 |=npts%+4|*corners|
|00002360| 5f 73 61 66 65 25 0d 0a | a0 17 e3 20 6d 69 6e 65 |_safe%..|... mine|
|00002370| 25 3d 30 20 b8 20 6e 70 | 74 73 25 2d 31 0d 0a aa |%=0 . np|ts%-1...|
|00002380| 17 20 20 6d 69 6e 65 6c | 69 73 74 25 3f 6d 69 6e |. minel|ist%?min|
|00002390| 65 25 3d 30 0d 0a b4 06 | 20 ed 0d 0a be 10 c8 95 |e%=0....| .......|
|000023a0| 20 6e 6d 69 6e 65 73 25 | 3e 30 0d 0a c8 07 20 20 | nmines%|>0.... |
|000023b0| f5 0d 0a d2 14 20 20 20 | 20 6f 6b 61 79 5f 63 65 |..... | okay_ce|
|000023c0| 6c 6c 25 3d b9 0d 0a dc | 18 20 20 20 20 63 65 6c |ll%=....|. cel|
|000023d0| 6c 25 3d b3 28 6e 70 74 | 73 25 29 2d 31 0d 0a e6 |l%=.(npt|s%)-1...|
|000023e0| 27 20 20 20 20 e7 6d 69 | 6e 65 6c 69 73 74 25 3f |' .mi|nelist%?|
|000023f0| 63 65 6c 6c 25 20 8c 20 | 6f 6b 61 79 5f 63 65 6c |cell% . |okay_cel|
|00002400| 6c 25 3d a3 0d 0a f0 19 | 20 20 20 20 e7 20 63 6f |l%=.....| . co|
|00002410| 72 6e 65 72 73 5f 73 61 | 66 65 25 20 8c 0d 0a fa |rners_sa|fe% ....|
|00002420| 17 20 20 20 20 20 20 74 | 65 73 74 76 65 72 74 65 |. t|estverte|
|00002430| 78 25 3d 30 0d 0b 04 2c | 20 20 20 20 20 20 c8 95 |x%=0...,| ..|
|00002440| 76 65 72 74 69 63 65 73 | 28 74 65 73 74 76 65 72 |vertices|(testver|
|00002450| 74 65 78 25 2c 32 29 3c | 3e 63 65 6c 6c 25 2b 31 |tex%,2)<|>cell%+1|
|00002460| 0d 0b 0e 1a 20 20 20 20 | 20 20 20 20 74 65 73 74 |.... | test|
|00002470| 76 65 72 74 65 78 25 2b | 3d 31 0d 0b 18 0c 20 20 |vertex%+|=1.... |
|00002480| 20 20 20 20 20 ce 0d 0b | 22 0b 20 20 20 20 20 20 | ...|". |
|00002490| f5 0d 0b 2c ca 20 20 20 | 20 20 20 20 20 e7 20 28 |...,. | . (|
|000024a0| 94 28 76 65 72 74 69 63 | 65 73 28 74 65 73 74 76 |.(vertic|es(testv|
|000024b0| 65 72 74 65 78 25 2c 30 | 29 2d 6c 65 66 74 29 3c |ertex%,0|)-left)<|
|000024c0| 61 63 63 75 72 61 63 79 | 20 84 20 94 28 76 65 72 |accuracy| . .(ver|
|000024d0| 74 69 63 65 73 28 74 65 | 73 74 76 65 72 74 65 78 |tices(te|stvertex|
|000024e0| 25 2c 30 29 2d 72 69 67 | 68 74 29 3c 61 63 63 75 |%,0)-rig|ht)<accu|
|000024f0| 72 61 63 79 29 20 80 20 | 28 94 28 76 65 72 74 69 |racy) . |(.(verti|
|00002500| 63 65 73 28 74 65 73 74 | 76 65 72 74 65 78 25 2c |ces(test|vertex%,|
|00002510| 31 29 2d 62 6f 74 74 6f | 6d 29 3c 61 63 63 75 72 |1)-botto|m)<accur|
|00002520| 61 63 79 20 84 20 94 28 | 76 65 72 74 69 63 65 73 |acy . .(|vertices|
|00002530| 28 74 65 73 74 76 65 72 | 74 65 78 25 2c 31 29 2d |(testver|tex%,1)-|
|00002540| 74 6f 70 29 3c 61 63 63 | 75 72 61 63 79 29 20 6f |top)<acc|uracy) o|
|00002550| 6b 61 79 5f 63 65 6c 6c | 25 3d a3 0d 0b 36 1a 20 |kay_cell|%=...6. |
|00002560| 20 20 20 20 20 20 20 74 | 65 73 74 76 65 72 74 65 | t|estverte|
|00002570| 78 25 2b 3d 31 0d 0b 40 | 2c 20 20 20 20 20 20 20 |x%+=1..@|, |
|00002580| fd 76 65 72 74 69 63 65 | 73 28 74 65 73 74 76 65 |.vertice|s(testve|
|00002590| 72 74 65 78 25 2c 32 29 | 3c 3e 63 65 6c 6c 25 2b |rtex%,2)|<>cell%+|
|000025a0| 31 0d 0b 4a 0a 20 20 20 | 20 20 cd 0d 0b 54 13 20 |1..J. | ...T. |
|000025b0| 20 20 fd 20 6f 6b 61 79 | 5f 63 65 6c 6c 25 0d 0b | . okay|_cell%..|
|000025c0| 5e 17 20 20 6d 69 6e 65 | 6c 69 73 74 25 3f 63 65 |^. mine|list%?ce|
|000025d0| 6c 6c 25 3d 31 0d 0b 68 | 10 20 20 6e 6d 69 6e 65 |ll%=1..h|. nmine|
|000025e0| 73 25 2d 3d 31 0d 0b 72 | 06 20 ce 0d 0b 7c 05 e1 |s%-=1..r|. ...|..|
|000025f0| 0d 0b 86 05 3a 0d 0b 90 | 2c dd 20 f2 64 72 61 77 |....:...|,. .draw|
|00002600| 62 6f 75 6e 64 61 72 69 | 65 73 28 61 72 72 61 79 |boundari|es(array|
|00002610| 28 29 2c 6e 70 74 73 25 | 2c 70 6f 69 6e 74 28 29 |(),npts%|,point()|
|00002620| 29 0d 0b 9a 23 ea 20 70 | 6f 69 6e 74 25 2c 63 6f |)...#. p|oint%,co|
|00002630| 75 6e 74 65 72 25 2c 73 | 74 61 72 74 78 2c 73 74 |unter%,s|tartx,st|
|00002640| 61 72 74 79 0d 0b a4 0e | 63 6f 75 6e 74 65 72 25 |arty....|counter%|
|00002650| 3d 30 0d 0b ae 15 e3 70 | 6f 69 6e 74 25 3d 31 20 |=0.....p|oint%=1 |
|00002660| b8 20 6e 70 74 73 25 0d | 0b b8 22 20 20 e7 20 61 |. npts%.|.." . a|
|00002670| 72 72 61 79 28 63 6f 75 | 6e 74 65 72 25 2c 32 29 |rray(cou|nter%,2)|
|00002680| 3d 70 6f 69 6e 74 25 20 | 8c 0d 0b c2 39 20 20 20 |=point% |....9 |
|00002690| 20 73 74 61 72 74 78 3d | 61 72 72 61 79 28 63 6f | startx=|array(co|
|000026a0| 75 6e 74 65 72 25 2c 30 | 29 3a 73 74 61 72 74 79 |unter%,0|):starty|
|000026b0| 3d 61 72 72 61 79 28 63 | 6f 75 6e 74 65 72 25 2c |=array(c|ounter%,|
|000026c0| 31 29 0d 0b cc 16 20 20 | 20 20 ec 73 74 61 72 74 |1).... | .start|
|000026d0| 78 2c 73 74 61 72 74 79 | 0d 0b d6 13 20 20 20 20 |x,starty|.... |
|000026e0| 63 6f 75 6e 74 65 72 25 | 2b 3d 31 0d 0b e0 22 20 |counter%|+=1..." |
|000026f0| 20 20 20 c8 95 61 72 72 | 61 79 28 63 6f 75 6e 74 | ..arr|ay(count|
|00002700| 65 72 25 2c 32 29 3d 70 | 6f 69 6e 74 25 0d 0b ea |er%,2)=p|oint%...|
|00002710| 2e 20 20 20 20 20 20 df | 61 72 72 61 79 28 63 6f |. .|array(co|
|00002720| 75 6e 74 65 72 25 2c 30 | 29 2c 61 72 72 61 79 28 |unter%,0|),array(|
|00002730| 63 6f 75 6e 74 65 72 25 | 2c 31 29 0d 0b f4 15 20 |counter%|,1).... |
|00002740| 20 20 20 20 20 63 6f 75 | 6e 74 65 72 25 2b 3d 31 | cou|nter%+=1|
|00002750| 0d 0b fe 0a 20 20 20 20 | 20 ce 0d 0c 08 16 20 20 |.... | ..... |
|00002760| 20 20 df 73 74 61 72 74 | 78 2c 73 74 61 72 74 79 | .start|x,starty|
|00002770| 0d 0c 12 08 20 20 20 cd | 0d 0c 1c 06 20 ed 0d 0c |.... .|.... ...|
|00002780| 26 05 e1 0d 0c 30 05 3a | 0d 0c 3a 2e dd 20 f2 64 |&....0.:|..:.. .d|
|00002790| 72 61 77 61 62 6f 75 6e | 64 61 72 79 28 76 65 72 |rawaboun|dary(ver|
|000027a0| 74 69 63 65 73 28 29 2c | 70 74 25 2c f8 20 76 65 |tices(),|pt%,. ve|
|000027b0| 72 74 65 78 25 29 0d 0c | 44 13 ea 20 73 74 61 72 |rtex%)..|D.. star|
|000027c0| 74 78 2c 73 74 61 72 74 | 79 0d 0c 4e 43 f4 20 76 |tx,start|y..NC. v|
|000027d0| 65 72 74 65 78 20 73 6f | 20 73 65 61 72 63 68 20 |ertex so| search |
|000027e0| 64 6f 65 73 6e 27 74 20 | 68 61 76 65 20 74 6f 20 |doesn't |have to |
|000027f0| 73 74 61 72 74 20 61 74 | 20 62 65 67 69 6e 6e 69 |start at| beginni|
|00002800| 6e 67 20 65 61 63 68 20 | 74 69 6d 65 0d 0c 58 1f |ng each |time..X.|
|00002810| c8 95 20 76 65 72 74 69 | 63 65 73 28 76 65 72 74 |.. verti|ces(vert|
|00002820| 65 78 25 2c 32 29 3c 3e | 70 74 25 0d 0c 62 10 20 |ex%,2)<>|pt%..b. |
|00002830| 20 76 65 72 74 65 78 25 | 2b 3d 31 0d 0c 6c 06 20 | vertex%|+=1..l. |
|00002840| ce 0d 0c 76 39 73 74 61 | 72 74 78 3d 76 65 72 74 |...v9sta|rtx=vert|
|00002850| 69 63 65 73 28 76 65 72 | 74 65 78 25 2c 30 29 3a |ices(ver|tex%,0):|
|00002860| 73 74 61 72 74 79 3d 76 | 65 72 74 69 63 65 73 28 |starty=v|ertices(|
|00002870| 76 65 72 74 65 78 25 2c | 31 29 0d 0c 80 12 ec 73 |vertex%,|1).....s|
|00002880| 74 61 72 74 78 2c 73 74 | 61 72 74 79 0d 0c 8a 20 |tartx,st|arty... |
|00002890| c8 95 20 76 65 72 74 69 | 63 65 73 28 76 65 72 74 |.. verti|ces(vert|
|000028a0| 65 78 25 2b 31 2c 32 29 | 3d 70 74 25 0d 0c 94 10 |ex%+1,2)|=pt%....|
|000028b0| 20 20 76 65 72 74 65 78 | 25 2b 3d 31 0d 0c 9e 2e | vertex|%+=1....|
|000028c0| 20 20 df 76 65 72 74 69 | 63 65 73 28 76 65 72 74 | .verti|ces(vert|
|000028d0| 65 78 25 2c 30 29 2c 76 | 65 72 74 69 63 65 73 28 |ex%,0),v|ertices(|
|000028e0| 76 65 72 74 65 78 25 2c | 31 29 0d 0c a8 06 20 ce |vertex%,|1).... .|
|000028f0| 0d 0c b2 12 df 73 74 61 | 72 74 78 2c 73 74 61 72 |.....sta|rtx,star|
|00002900| 74 79 0d 0c bc 05 e1 0d | 0c c6 05 3a 0d 0c d0 2f |ty......|...:.../|
|00002910| dd 20 f2 73 6f 72 74 62 | 6f 75 6e 64 61 72 69 65 |. .sortb|oundarie|
|00002920| 73 28 76 65 72 74 69 63 | 65 73 28 29 2c 70 6f 69 |s(vertic|es(),poi|
|00002930| 6e 74 28 29 2c 6e 70 74 | 73 25 29 0d 0c da 16 ea |nt(),npt|s%).....|
|00002940| 20 70 74 25 2c 76 31 25 | 2c 76 32 25 2c 63 61 6e | pt%,v1%|,v2%,can|
|00002950| 67 0d 0c e4 0c 63 6e 74 | 72 31 25 3d 30 0d 0c ee |g....cnt|r1%=0...|
|00002960| 12 e3 70 74 25 3d 31 20 | b8 20 6e 70 74 73 25 0d |..pt%=1 |. npts%.|
|00002970| 0c f8 1b 20 20 c8 95 76 | 65 72 74 69 63 65 73 28 |... ..v|ertices(|
|00002980| 76 31 25 2c 32 29 3d 70 | 74 25 0d 0d 02 11 20 20 |v1%,2)=p|t%.... |
|00002990| 20 20 76 32 25 3d 76 31 | 25 2b 31 0d 0d 0c 4c 20 | v2%=v1|%+1...L |
|000029a0| 20 20 20 63 61 6e 67 3d | a4 70 6f 6c 28 76 65 72 | cang=|.pol(ver|
|000029b0| 74 69 63 65 73 28 76 31 | 25 2c 30 29 2d 70 6f 69 |tices(v1|%,0)-poi|
|000029c0| 6e 74 28 70 74 25 2c 30 | 29 2c 76 65 72 74 69 63 |nt(pt%,0|),vertic|
|000029d0| 65 73 28 76 31 25 2c 31 | 29 2d 70 6f 69 6e 74 28 |es(v1%,1|)-point(|
|000029e0| 70 74 25 2c 31 29 29 0d | 0d 16 1d 20 20 20 20 c8 |pt%,1)).|... .|
|000029f0| 95 76 65 72 74 69 63 65 | 73 28 76 32 25 2c 32 29 |.vertice|s(v2%,2)|
|00002a00| 3d 70 74 25 0d 0d 20 52 | 20 20 20 20 20 20 e7 20 |=pt%.. R| . |
|00002a10| a4 70 6f 6c 28 76 65 72 | 74 69 63 65 73 28 76 32 |.pol(ver|tices(v2|
|00002a20| 25 2c 30 29 2d 70 6f 69 | 6e 74 28 70 74 25 2c 30 |%,0)-poi|nt(pt%,0|
|00002a30| 29 2c 76 65 72 74 69 63 | 65 73 28 76 32 25 2c 31 |),vertic|es(v2%,1|
|00002a40| 29 2d 70 6f 69 6e 74 28 | 70 74 25 2c 31 29 29 3c |)-point(|pt%,1))<|
|00002a50| 63 61 6e 67 20 8c 0d 0d | 2a 2d 20 20 20 20 20 20 |cang ...|*- |
|00002a60| 20 20 c8 94 76 65 72 74 | 69 63 65 73 28 76 31 25 | ..vert|ices(v1%|
|00002a70| 2c 30 29 2c 76 65 72 74 | 69 63 65 73 28 76 32 25 |,0),vert|ices(v2%|
|00002a80| 2c 30 29 0d 0d 34 2d 20 | 20 20 20 20 20 20 20 c8 |,0)..4- | .|
|00002a90| 94 76 65 72 74 69 63 65 | 73 28 76 31 25 2c 31 29 |.vertice|s(v1%,1)|
|00002aa0| 2c 76 65 72 74 69 63 65 | 73 28 76 32 25 2c 31 29 |,vertice|s(v2%,1)|
|00002ab0| 0d 0d 3e 2d 20 20 20 20 | 20 20 20 20 c8 94 76 65 |..>- | ..ve|
|00002ac0| 72 74 69 63 65 73 28 76 | 31 25 2c 32 29 2c 76 65 |rtices(v|1%,2),ve|
|00002ad0| 72 74 69 63 65 73 28 76 | 32 25 2c 32 29 0d 0d 48 |rtices(v|2%,2)..H|
|00002ae0| 50 20 20 20 20 20 20 20 | 20 63 61 6e 67 3d a4 70 |P | cang=.p|
|00002af0| 6f 6c 28 76 65 72 74 69 | 63 65 73 28 76 31 25 2c |ol(verti|ces(v1%,|
|00002b00| 30 29 2d 70 6f 69 6e 74 | 28 70 74 25 2c 30 29 2c |0)-point|(pt%,0),|
|00002b10| 76 65 72 74 69 63 65 73 | 28 76 31 25 2c 31 29 2d |vertices|(v1%,1)-|
|00002b20| 70 6f 69 6e 74 28 70 74 | 25 2c 31 29 29 0d 0d 52 |point(pt|%,1))..R|
|00002b30| 0c 20 20 20 20 20 20 20 | cd 0d 0d 5c 10 20 20 20 |. |...\. |
|00002b40| 20 20 20 76 32 25 2b 3d | 31 0d 0d 66 0a 20 20 20 | v2%+=|1..f. |
|00002b50| 20 20 ce 0d 0d 70 0e 20 | 20 20 20 76 31 25 2b 3d | ...p. | v1%+=|
|00002b60| 31 0d 0d 7a 08 20 20 20 | ce 0d 0d 84 06 20 ed 0d |1..z. |..... ..|
|00002b70| 0d 8e 05 e1 0d 0d 98 05 | 3a 0d 0d a2 31 dd 20 f2 |........|:...1. .|
|00002b80| 66 69 6c 6c 72 65 67 69 | 6f 6e 28 70 74 73 28 29 |fillregi|on(pts()|
|00002b90| 2c 76 65 72 74 69 63 65 | 73 28 29 2c 70 74 25 2c |,vertice|s(),pt%,|
|00002ba0| f8 20 76 65 72 74 65 78 | 25 29 0d 0d ac 13 ea 20 |. vertex|%)..... |
|00002bb0| 73 74 61 72 74 78 2c 73 | 74 61 72 74 79 0d 0d b6 |startx,s|tarty...|
|00002bc0| 43 f4 20 76 65 72 74 65 | 78 20 73 6f 20 73 65 61 |C. verte|x so sea|
|00002bd0| 72 63 68 20 64 6f 65 73 | 6e 27 74 20 68 61 76 65 |rch does|n't have|
|00002be0| 20 74 6f 20 73 74 61 72 | 74 20 61 74 20 62 65 67 | to star|t at beg|
|00002bf0| 69 6e 6e 69 6e 67 20 65 | 61 63 68 20 74 69 6d 65 |inning e|ach time|
|00002c00| 0d 0d c0 1f c8 95 20 76 | 65 72 74 69 63 65 73 28 |...... v|ertices(|
|00002c10| 76 65 72 74 65 78 25 2c | 32 29 3c 3e 70 74 25 0d |vertex%,|2)<>pt%.|
|00002c20| 0d ca 10 20 20 76 65 72 | 74 65 78 25 2b 3d 31 0d |... ver|tex%+=1.|
|00002c30| 0d d4 06 20 ce 0d 0d de | 39 73 74 61 72 74 78 3d |... ....|9startx=|
|00002c40| 76 65 72 74 69 63 65 73 | 28 76 65 72 74 65 78 25 |vertices|(vertex%|
|00002c50| 2c 30 29 3a 73 74 61 72 | 74 79 3d 76 65 72 74 69 |,0):star|ty=verti|
|00002c60| 63 65 73 28 76 65 72 74 | 65 78 25 2c 31 29 0d 0d |ces(vert|ex%,1)..|
|00002c70| e8 12 ec 73 74 61 72 74 | 78 2c 73 74 61 72 74 79 |...start|x,starty|
|00002c80| 0d 0d f2 20 c8 95 20 76 | 65 72 74 69 63 65 73 28 |... .. v|ertices(|
|00002c90| 76 65 72 74 65 78 25 2b | 31 2c 32 29 3d 70 74 25 |vertex%+|1,2)=pt%|
|00002ca0| 0d 0d fc 1c 20 20 ec 70 | 74 73 28 70 74 25 2c 30 |.... .p|ts(pt%,0|
|00002cb0| 29 2c 70 74 73 28 70 74 | 25 2c 31 29 0d 0e 06 10 |),pts(pt|%,1)....|
|00002cc0| 20 20 76 65 72 74 65 78 | 25 2b 3d 31 0d 0e 10 31 | vertex|%+=1...1|
|00002cd0| 20 20 f0 38 35 2c 76 65 | 72 74 69 63 65 73 28 76 | .85,ve|rtices(v|
|00002ce0| 65 72 74 65 78 25 2c 30 | 29 2c 76 65 72 74 69 63 |ertex%,0|),vertic|
|00002cf0| 65 73 28 76 65 72 74 65 | 78 25 2c 31 29 0d 0e 1a |es(verte|x%,1)...|
|00002d00| 06 20 ce 0d 0e 24 1a ec | 70 74 73 28 70 74 25 2c |. ...$..|pts(pt%,|
|00002d10| 30 29 2c 70 74 73 28 70 | 74 25 2c 31 29 0d 0e 2e |0),pts(p|t%,1)...|
|00002d20| 15 f0 38 35 2c 73 74 61 | 72 74 78 2c 73 74 61 72 |..85,sta|rtx,star|
|00002d30| 74 79 0d 0e 38 05 e1 0d | 0e 42 05 3a 0d 0e 4c 11 |ty..8...|.B.:..L.|
|00002d40| dd 20 a4 70 6f 6c 28 58 | 64 2c 59 64 29 0d 0e 56 |. .pol(X|d,Yd)..V|
|00002d50| 09 ea 20 61 6e 67 0d 0e | 60 0c e7 58 64 3c 3e 30 |.. ang..|`..Xd<>0|
|00002d60| 20 8c 0d 0e 6a 12 20 20 | 61 6e 67 3d 99 28 59 64 | ...j. |ang=.(Yd|
|00002d70| 2f 58 64 29 0d 0e 74 15 | 20 20 e7 61 6e 67 3c 30 |/Xd)..t.| .ang<0|
|00002d80| 20 61 6e 67 2b 3d 32 2a | af 0d 0e 7e 13 20 20 e7 | ang+=2*|...~. .|
|00002d90| 20 58 64 3c 30 20 61 6e | 67 2b 3d af 0d 0e 88 17 | Xd<0 an|g+=.....|
|00002da0| 20 20 e7 61 6e 67 3e 32 | 2a af 20 61 6e 67 2d 3d | .ang>2|*. ang-=|
|00002db0| 32 2a af 0d 0e 92 06 20 | cc 0d 0e 9c 26 20 20 e7 |2*..... |....& .|
|00002dc0| 20 59 64 3d 30 20 8c 20 | 61 6e 67 3d 30 20 8b 20 | Yd=0 . |ang=0 . |
|00002dd0| 61 6e 67 3d af 2d af 2a | b4 28 59 64 29 2f 32 0d |ang=.-.*|.(Yd)/2.|
|00002de0| 0e a6 06 20 cd 0d 0e b0 | 08 3d 61 6e 67 0d 0e ba |... ....|.=ang...|
|00002df0| 05 3a 0d 0e c4 39 dd 20 | f2 68 69 67 68 6c 69 67 |.:...9. |.highlig|
|00002e00| 68 74 28 70 74 73 28 29 | 2c 76 65 72 74 69 63 65 |ht(pts()|,vertice|
|00002e10| 73 28 29 2c 6e 70 74 73 | 25 2c 63 65 6e 74 72 65 |s(),npts|%,centre|
|00002e20| 25 2c 63 6f 6e 6e 65 63 | 74 25 29 0d 0e ce 19 ea |%,connec|t%).....|
|00002e30| 20 76 25 2c 76 32 25 2c | 74 76 25 2c 63 6f 75 6e | v%,v2%,|tv%,coun|
|00002e40| 74 65 72 25 0d 0e d8 0e | 63 6f 75 6e 74 65 72 25 |ter%....|counter%|
|00002e50| 3d 31 0d 0e e2 0e 76 25 | 3d 30 3a 76 32 25 3d 30 |=1....v%|=0:v2%=0|
|00002e60| 0d 0e ec 16 c8 95 63 6f | 75 6e 74 65 72 25 3c 63 |......co|unter%<c|
|00002e70| 65 6e 74 72 65 25 0d 0e | f6 35 20 20 e7 20 a4 63 |entre%..|.5 . .c|
|00002e80| 65 6c 6c 63 6f 6e 6e 65 | 63 74 28 a3 2c 30 2c 63 |ellconne|ct(.,0,c|
|00002e90| 6f 75 6e 74 65 72 25 2c | 63 65 6e 74 72 65 25 2c |ounter%,|centre%,|
|00002ea0| 63 6f 6e 6e 65 63 74 25 | 29 20 8c 0d 0f 00 10 20 |connect%|) ..... |
|00002eb0| 20 20 20 e6 31 2c 25 31 | 31 30 30 0d 0f 0a 31 20 | .1,%1|100...1 |
|00002ec0| 20 20 20 f2 66 69 6c 6c | 72 65 67 69 6f 6e 28 70 | .fill|region(p|
|00002ed0| 74 73 28 29 2c 76 65 72 | 74 69 63 65 73 28 29 2c |ts(),ver|tices(),|
|00002ee0| 63 6f 75 6e 74 65 72 25 | 2c 76 25 29 0d 0f 14 0c |counter%|,v%)....|
|00002ef0| 20 20 20 20 e6 30 2c 30 | 0d 0f 1e 2f 20 20 20 20 | .0,0|.../ |
|00002f00| f2 64 72 61 77 61 62 6f | 75 6e 64 61 72 79 28 76 |.drawabo|undary(v|
|00002f10| 65 72 74 69 63 65 73 28 | 29 2c 63 6f 75 6e 74 65 |ertices(|),counte|
|00002f20| 72 25 2c 76 32 25 29 0d | 0f 28 08 20 20 20 cd 0d |r%,v2%).|.(. ..|
|00002f30| 0f 32 11 20 20 63 6f 75 | 6e 74 65 72 25 2b 3d 31 |.2. cou|nter%+=1|
|00002f40| 0d 0f 3c 06 20 ce 0d 0f | 46 0c e6 31 2c 25 31 30 |..<. ...|F..1,%10|
|00002f50| 30 30 0d 0f 50 0a 74 76 | 25 3d 76 25 0d 0f 5a 2d |00..P.tv|%=v%..Z-|
|00002f60| f2 66 69 6c 6c 72 65 67 | 69 6f 6e 28 70 74 73 28 |.fillreg|ion(pts(|
|00002f70| 29 2c 76 65 72 74 69 63 | 65 73 28 29 2c 63 65 6e |),vertic|es(),cen|
|00002f80| 74 72 65 25 2c 74 76 25 | 29 0d 0f 64 0c e6 32 2c |tre%,tv%|)..d..2,|
|00002f90| 25 31 30 31 31 0d 0f 6e | 2c f2 66 69 6c 6c 72 65 |%1011..n|,.fillre|
|00002fa0| 67 69 6f 6e 28 70 74 73 | 28 29 2c 76 65 72 74 69 |gion(pts|(),verti|
|00002fb0| 63 65 73 28 29 2c 63 65 | 6e 74 72 65 25 2c 76 25 |ces(),ce|ntre%,v%|
|00002fc0| 29 0d 0f 78 08 e6 30 2c | 30 0d 0f 82 2a f2 64 72 |)..x..0,|0...*.dr|
|00002fd0| 61 77 61 62 6f 75 6e 64 | 61 72 79 28 76 65 72 74 |awabound|ary(vert|
|00002fe0| 69 63 65 73 28 29 2c 63 | 65 6e 74 72 65 25 2c 76 |ices(),c|entre%,v|
|00002ff0| 32 25 29 0d 0f 8c 0f 63 | 6f 75 6e 74 65 72 25 2b |2%)....c|ounter%+|
|00003000| 3d 31 0d 0f 96 15 c8 95 | 63 6f 75 6e 74 65 72 25 |=1......|counter%|
|00003010| 3c 3d 6e 70 74 73 25 0d | 0f a0 35 20 20 e7 20 a4 |<=npts%.|..5 . .|
|00003020| 63 65 6c 6c 63 6f 6e 6e | 65 63 74 28 a3 2c 30 2c |cellconn|ect(.,0,|
|00003030| 63 6f 75 6e 74 65 72 25 | 2c 63 65 6e 74 72 65 25 |counter%|,centre%|
|00003040| 2c 63 6f 6e 6e 65 63 74 | 25 29 20 8c 0d 0f aa 10 |,connect|%) .....|
|00003050| 20 20 20 20 e6 31 2c 25 | 31 31 30 30 0d 0f b4 31 | .1,%|1100...1|
|00003060| 20 20 20 20 f2 66 69 6c | 6c 72 65 67 69 6f 6e 28 | .fil|lregion(|
|00003070| 70 74 73 28 29 2c 76 65 | 72 74 69 63 65 73 28 29 |pts(),ve|rtices()|
|00003080| 2c 63 6f 75 6e 74 65 72 | 25 2c 76 25 29 0d 0f be |,counter|%,v%)...|
|00003090| 0c 20 20 20 20 e6 30 2c | 30 0d 0f c8 2f 20 20 20 |. .0,|0.../ |
|000030a0| 20 f2 64 72 61 77 61 62 | 6f 75 6e 64 61 72 79 28 | .drawab|oundary(|
|000030b0| 76 65 72 74 69 63 65 73 | 28 29 2c 63 6f 75 6e 74 |vertices|(),count|
|000030c0| 65 72 25 2c 76 32 25 29 | 0d 0f d2 08 20 20 20 cd |er%,v2%)|.... .|
|000030d0| 0d 0f dc 11 20 20 63 6f | 75 6e 74 65 72 25 2b 3d |.... co|unter%+=|
|000030e0| 31 0d 0f e6 06 20 ce 0d | 0f f0 05 e1 0d 0f fa 05 |1.... ..|........|
|000030f0| 3a 0d 10 04 3b dd 20 f2 | 75 6e 68 69 67 68 6c 69 |:...;. .|unhighli|
|00003100| 67 68 74 28 70 74 73 28 | 29 2c 76 65 72 74 69 63 |ght(pts(|),vertic|
|00003110| 65 73 28 29 2c 6e 70 74 | 73 25 2c 63 65 6e 74 72 |es(),npt|s%,centr|
|00003120| 65 25 2c 63 6f 6e 6e 65 | 63 74 25 29 0d 10 0e 19 |e%,conne|ct%)....|
|00003130| ea 20 76 25 2c 76 32 25 | 2c 74 76 25 2c 63 6f 75 |. v%,v2%|,tv%,cou|
|00003140| 6e 74 65 72 25 0d 10 18 | 0e 63 6f 75 6e 74 65 72 |nter%...|.counter|
|00003150| 25 3d 31 0d 10 22 0e 76 | 25 3d 30 3a 76 32 25 3d |%=1..".v|%=0:v2%=|
|00003160| 30 0d 10 2c 16 c8 95 63 | 6f 75 6e 74 65 72 25 3c |0..,...c|ounter%<|
|00003170| 63 65 6e 74 72 65 25 0d | 10 36 35 20 20 e7 20 a4 |centre%.|.65 . .|
|00003180| 63 65 6c 6c 63 6f 6e 6e | 65 63 74 28 a3 2c 30 2c |cellconn|ect(.,0,|
|00003190| 63 6f 75 6e 74 65 72 25 | 2c 63 65 6e 74 72 65 25 |counter%|,centre%|
|000031a0| 2c 63 6f 6e 6e 65 63 74 | 25 29 20 8c 0d 10 40 10 |,connect|%) ...@.|
|000031b0| 20 20 20 20 e6 32 2c 25 | 30 31 31 31 0d 10 4a 31 | .2,%|0111..J1|
|000031c0| 20 20 20 20 f2 66 69 6c | 6c 72 65 67 69 6f 6e 28 | .fil|lregion(|
|000031d0| 70 74 73 28 29 2c 76 65 | 72 74 69 63 65 73 28 29 |pts(),ve|rtices()|
|000031e0| 2c 63 6f 75 6e 74 65 72 | 25 2c 76 25 29 0d 10 54 |,counter|%,v%)..T|
|000031f0| 0c 20 20 20 20 e6 30 2c | 30 0d 10 5e 2f 20 20 20 |. .0,|0..^/ |
|00003200| 20 f2 64 72 61 77 61 62 | 6f 75 6e 64 61 72 79 28 | .drawab|oundary(|
|00003210| 76 65 72 74 69 63 65 73 | 28 29 2c 63 6f 75 6e 74 |vertices|(),count|
|00003220| 65 72 25 2c 76 32 25 29 | 0d 10 68 08 20 20 20 cd |er%,v2%)|..h. .|
|00003230| 0d 10 72 11 20 20 63 6f | 75 6e 74 65 72 25 2b 3d |..r. co|unter%+=|
|00003240| 31 0d 10 7c 06 20 ce 0d | 10 86 0a 74 76 25 3d 76 |1..|. ..|...tv%=v|
|00003250| 25 0d 10 90 0c e6 31 2c | 25 30 31 30 30 0d 10 9a |%.....1,|%0100...|
|00003260| 2d f2 66 69 6c 6c 72 65 | 67 69 6f 6e 28 70 74 73 |-.fillre|gion(pts|
|00003270| 28 29 2c 76 65 72 74 69 | 63 65 73 28 29 2c 63 65 |(),verti|ces(),ce|
|00003280| 6e 74 72 65 25 2c 74 76 | 25 29 0d 10 a4 0c e6 32 |ntre%,tv|%).....2|
|00003290| 2c 25 30 31 31 31 0d 10 | ae 2c f2 66 69 6c 6c 72 |,%0111..|.,.fillr|
|000032a0| 65 67 69 6f 6e 28 70 74 | 73 28 29 2c 76 65 72 74 |egion(pt|s(),vert|
|000032b0| 69 63 65 73 28 29 2c 63 | 65 6e 74 72 65 25 2c 76 |ices(),c|entre%,v|
|000032c0| 25 29 0d 10 b8 08 e6 30 | 2c 30 0d 10 c2 2a f2 64 |%).....0|,0...*.d|
|000032d0| 72 61 77 61 62 6f 75 6e | 64 61 72 79 28 76 65 72 |rawaboun|dary(ver|
|000032e0| 74 69 63 65 73 28 29 2c | 63 65 6e 74 72 65 25 2c |tices(),|centre%,|
|000032f0| 76 32 25 29 0d 10 cc 0f | 63 6f 75 6e 74 65 72 25 |v2%)....|counter%|
|00003300| 2b 3d 31 0d 10 d6 15 c8 | 95 63 6f 75 6e 74 65 72 |+=1.....|.counter|
|00003310| 25 3c 3d 6e 70 74 73 25 | 0d 10 e0 35 20 20 e7 20 |%<=npts%|...5 . |
|00003320| a4 63 65 6c 6c 63 6f 6e | 6e 65 63 74 28 a3 2c 30 |.cellcon|nect(.,0|
|00003330| 2c 63 6f 75 6e 74 65 72 | 25 2c 63 65 6e 74 72 65 |,counter|%,centre|
|00003340| 25 2c 63 6f 6e 6e 65 63 | 74 25 29 20 8c 0d 10 ea |%,connec|t%) ....|
|00003350| 10 20 20 20 20 e6 32 2c | 25 30 31 31 31 0d 10 f4 |. .2,|%0111...|
|00003360| 31 20 20 20 20 f2 66 69 | 6c 6c 72 65 67 69 6f 6e |1 .fi|llregion|
|00003370| 28 70 74 73 28 29 2c 76 | 65 72 74 69 63 65 73 28 |(pts(),v|ertices(|
|00003380| 29 2c 63 6f 75 6e 74 65 | 72 25 2c 76 25 29 0d 10 |),counte|r%,v%)..|
|00003390| fe 0c 20 20 20 20 e6 30 | 2c 30 0d 11 08 2f 20 20 |.. .0|,0.../ |
|000033a0| 20 20 f2 64 72 61 77 61 | 62 6f 75 6e 64 61 72 79 | .drawa|boundary|
|000033b0| 28 76 65 72 74 69 63 65 | 73 28 29 2c 63 6f 75 6e |(vertice|s(),coun|
|000033c0| 74 65 72 25 2c 76 32 25 | 29 0d 11 12 08 20 20 20 |ter%,v2%|).... |
|000033d0| cd 0d 11 1c 11 20 20 63 | 6f 75 6e 74 65 72 25 2b |..... c|ounter%+|
|000033e0| 3d 31 0d 11 26 06 20 ce | 0d 11 30 05 e1 0d 11 3a |=1..&. .|..0....:|
|000033f0| 05 3a 0d 11 44 23 dd 20 | a4 66 69 6e 64 63 6c 6f |.:..D#. |.findclo|
|00003400| 73 65 73 74 28 70 74 73 | 28 29 2c 6e 70 74 73 25 |sest(pts|(),npts%|
|00003410| 2c 78 2c 79 29 0d 11 4e | 2c ea 20 74 65 73 74 70 |,x,y)..N|,. testp|
|00003420| 6f 69 6e 74 25 2c 63 6c | 6f 73 65 73 74 2c 63 75 |oint%,cl|osest,cu|
|00003430| 72 72 64 69 73 74 2c 63 | 75 72 72 70 6f 69 6e 74 |rrdist,c|urrpoint|
|00003440| 25 0d 11 58 3f 63 6c 6f | 73 65 73 74 3d 28 78 2d |%..X?clo|sest=(x-|
|00003450| 70 74 73 28 31 2c 30 29 | 29 2a 28 78 2d 70 74 73 |pts(1,0)|)*(x-pts|
|00003460| 28 31 2c 30 29 29 2b 28 | 79 2d 70 74 73 28 31 2c |(1,0))+(|y-pts(1,|
|00003470| 31 29 29 2a 28 79 2d 70 | 74 73 28 31 2c 31 29 29 |1))*(y-p|ts(1,1))|
|00003480| 0d 11 62 10 63 75 72 72 | 70 6f 69 6e 74 25 3d 31 |..b.curr|point%=1|
|00003490| 0d 11 6c 19 e3 74 65 73 | 74 70 6f 69 6e 74 25 3d |..l..tes|tpoint%=|
|000034a0| 32 20 b8 20 6e 70 74 73 | 25 0d 11 76 66 20 20 63 |2 . npts|%..vf c|
|000034b0| 75 72 72 64 69 73 74 3d | 28 78 2d 70 74 73 28 74 |urrdist=|(x-pts(t|
|000034c0| 65 73 74 70 6f 69 6e 74 | 25 2c 30 29 29 2a 28 78 |estpoint|%,0))*(x|
|000034d0| 2d 70 74 73 28 74 65 73 | 74 70 6f 69 6e 74 25 2c |-pts(tes|tpoint%,|
|000034e0| 30 29 29 2b 28 79 2d 70 | 74 73 28 74 65 73 74 70 |0))+(y-p|ts(testp|
|000034f0| 6f 69 6e 74 25 2c 31 29 | 29 2a 28 79 2d 70 74 73 |oint%,1)|)*(y-pts|
|00003500| 28 74 65 73 74 70 6f 69 | 6e 74 25 2c 31 29 29 0d |(testpoi|nt%,1)).|
|00003510| 11 80 3e 20 20 e7 63 75 | 72 72 64 69 73 74 3c 63 |..> .cu|rrdist<c|
|00003520| 6c 6f 73 65 73 74 20 63 | 6c 6f 73 65 73 74 3d 63 |losest c|losest=c|
|00003530| 75 72 72 64 69 73 74 3a | 63 75 72 72 70 6f 69 6e |urrdist:|currpoin|
|00003540| 74 25 3d 74 65 73 74 70 | 6f 69 6e 74 25 0d 11 8a |t%=testp|oint%...|
|00003550| 06 20 ed 0d 11 94 0f 3d | 63 75 72 72 70 6f 69 6e |. .....=|currpoin|
|00003560| 74 25 0d 11 9e 05 3a 0d | 11 a8 40 dd 20 f2 63 6c |t%....:.|..@. .cl|
|00003570| 65 61 72 63 65 6c 6c 28 | 63 65 6c 6c 25 2c 70 74 |earcell(|cell%,pt|
|00003580| 28 29 2c 76 65 72 74 28 | 29 2c 6e 70 74 73 25 2c |(),vert(|),npts%,|
|00003590| 63 6f 6e 6e 65 63 74 25 | 2c 6d 69 6e 65 25 2c f8 |connect%|,mine%,.|
|000035a0| 20 62 6f 6f 6d 25 29 0d | 11 b2 1a ea 20 73 75 72 | boom%).|.... sur|
|000035b0| 72 6d 69 6e 65 73 25 2c | 74 65 73 74 63 65 6c 6c |rmines%,|testcell|
|000035c0| 25 0d 11 bc 10 73 75 72 | 72 6d 69 6e 65 73 25 3d |%....sur|rmines%=|
|000035d0| 30 0d 11 c6 2b 3f 28 6d | 69 6e 65 25 2b 63 65 6c |0...+?(m|ine%+cel|
|000035e0| 6c 25 2d 31 29 3d 3f 28 | 6d 69 6e 65 25 2b 63 65 |l%-1)=?(|mine%+ce|
|000035f0| 6c 6c 25 2d 31 29 20 84 | 20 25 31 30 0d 11 d0 1c |ll%-1) .| %10....|
|00003600| e7 20 3f 28 6d 69 6e 65 | 25 2b 63 65 6c 6c 25 2d |. ?(mine|%+cell%-|
|00003610| 31 29 20 80 20 31 20 8c | 0d 11 da 0a 20 20 e6 31 |1) . 1 .|.... .1|
|00003620| 2c 31 0d 11 e4 2f 20 20 | f2 66 69 6c 6c 72 65 67 |,1.../ |.fillreg|
|00003630| 69 6f 6e 28 70 74 28 29 | 2c 76 65 72 74 28 29 2c |ion(pt()|,vert(),|
|00003640| 63 65 6c 6c 25 2c 73 75 | 72 72 6d 69 6e 65 73 25 |cell%,su|rrmines%|
|00003650| 29 0d 11 ee 12 20 20 73 | 75 72 72 6d 69 6e 65 73 |).... s|urrmines|
|00003660| 25 3d 30 0d 11 f8 0a 20 | 20 e6 30 2c 30 0d 12 02 |%=0.... | .0,0...|
|00003670| 2d 20 20 f2 64 72 61 77 | 61 62 6f 75 6e 64 61 72 |- .draw|aboundar|
|00003680| 79 28 76 65 72 74 28 29 | 2c 63 65 6c 6c 25 2c 73 |y(vert()|,cell%,s|
|00003690| 75 72 72 6d 69 6e 65 73 | 25 29 0d 12 0c 0d 20 20 |urrmines|%).... |
|000036a0| 62 6f 6f 6d 25 3d b9 0d | 12 16 06 20 cc 0d 12 20 |boom%=..|... ... |
|000036b0| 0a 20 20 e6 31 2c 31 0d | 12 2a 2f 20 20 f2 66 69 |. .1,1.|.*/ .fi|
|000036c0| 6c 6c 72 65 67 69 6f 6e | 28 70 74 28 29 2c 76 65 |llregion|(pt(),ve|
|000036d0| 72 74 28 29 2c 63 65 6c | 6c 25 2c 73 75 72 72 6d |rt(),cel|l%,surrm|
|000036e0| 69 6e 65 73 25 29 0d 12 | 34 12 20 20 73 75 72 72 |ines%)..|4. surr|
|000036f0| 6d 69 6e 65 73 25 3d 30 | 0d 12 3e 0a 20 20 e6 30 |mines%=0|..>. .0|
|00003700| 2c 30 0d 12 48 2d 20 20 | f2 64 72 61 77 61 62 6f |,0..H- |.drawabo|
|00003710| 75 6e 64 61 72 79 28 76 | 65 72 74 28 29 2c 63 65 |undary(v|ert(),ce|
|00003720| 6c 6c 25 2c 73 75 72 72 | 6d 69 6e 65 73 25 29 0d |ll%,surr|mines%).|
|00003730| 12 52 12 20 20 73 75 72 | 72 6d 69 6e 65 73 25 3d |.R. sur|rmines%=|
|00003740| 30 0d 12 5c 1b 20 20 e3 | 20 74 65 73 74 63 65 6c |0..\. .| testcel|
|00003750| 6c 25 3d 31 20 b8 20 6e | 70 74 73 25 0d 12 66 1c |l%=1 . n|pts%..f.|
|00003760| 20 20 20 20 e7 20 74 65 | 73 74 63 65 6c 6c 25 3c | . te|stcell%<|
|00003770| 3e 63 65 6c 6c 25 20 8c | 0d 12 70 38 20 20 20 20 |>cell% .|..p8 |
|00003780| 20 20 e7 20 a4 63 65 6c | 6c 63 6f 6e 6e 65 63 74 | . .cel|lconnect|
|00003790| 28 a3 2c 30 2c 63 65 6c | 6c 25 2c 74 65 73 74 63 |(.,0,cel|l%,testc|
|000037a0| 65 6c 6c 25 2c 63 6f 6e | 6e 65 63 74 25 29 20 8c |ell%,con|nect%) .|
|000037b0| 0d 12 7a 36 20 20 20 20 | 20 20 20 20 e7 20 3f 28 |..z6 | . ?(|
|000037c0| 6d 69 6e 65 25 2b 74 65 | 73 74 63 65 6c 6c 25 2d |mine%+te|stcell%-|
|000037d0| 31 29 20 80 20 31 20 8c | 20 73 75 72 72 6d 69 6e |1) . 1 .| surrmin|
|000037e0| 65 73 25 2b 3d 31 0d 12 | 84 0c 20 20 20 20 20 20 |es%+=1..|.. |
|000037f0| 20 cd 0d 12 8e 0a 20 20 | 20 20 20 cd 0d 12 98 08 | ..... | .....|
|00003800| 20 20 20 ed 0d 12 a2 16 | 20 20 e7 20 73 75 72 72 | .....| . surr|
|00003810| 6d 69 6e 65 73 25 3e 30 | 20 8c 0d 12 ac 0a 20 20 |mines%>0| ..... |
|00003820| 20 20 ef 35 0d 12 b6 59 | 20 20 20 20 e6 31 2c 32 | .5...Y| .1,2|
|00003830| 3a ec 70 74 28 63 65 6c | 6c 25 2c 30 29 2d 34 2a |:.pt(cel|l%,0)-4*|
|00003840| 78 73 63 61 6c 65 25 2a | a9 28 c3 28 73 75 72 72 |xscale%*|.(.(surr|
|00003850| 6d 69 6e 65 73 25 29 29 | 2c 70 74 28 63 65 6c 6c |mines%))|,pt(cell|
|00003860| 25 2c 31 29 2b 34 2a 79 | 73 63 61 6c 65 25 3a f1 |%,1)+4*y|scale%:.|
|00003870| c3 28 73 75 72 72 6d 69 | 6e 65 73 25 29 0d 12 c0 |.(surrmi|nes%)...|
|00003880| 5d 20 20 20 20 e6 32 2c | 25 31 31 31 30 3a ec 70 |] .2,|%1110:.p|
|00003890| 74 28 63 65 6c 6c 25 2c | 30 29 2d 34 2a 78 73 63 |t(cell%,|0)-4*xsc|
|000038a0| 61 6c 65 25 2a a9 28 c3 | 28 73 75 72 72 6d 69 6e |ale%*.(.|(surrmin|
|000038b0| 65 73 25 29 29 2c 70 74 | 28 63 65 6c 6c 25 2c 31 |es%)),pt|(cell%,1|
|000038c0| 29 2b 34 2a 79 73 63 61 | 6c 65 25 3a f1 c3 28 73 |)+4*ysca|le%:..(s|
|000038d0| 75 72 72 6d 69 6e 65 73 | 25 29 0d 12 ca 0c 20 20 |urrmines|%).... |
|000038e0| 20 20 ef 34 3a 87 0d 12 | d4 08 20 20 20 cd 0d 12 | .4:...|.. ...|
|000038f0| de 06 20 cd 0d 12 e8 05 | e1 0d 12 f2 05 3a 0d 12 |.. .....|.....:..|
|00003900| fc 3a dd 20 f2 66 6c 61 | 67 63 65 6c 6c 28 63 65 |.:. .fla|gcell(ce|
|00003910| 6c 6c 25 2c 70 74 28 29 | 2c 76 65 72 74 28 29 2c |ll%,pt()|,vert(),|
|00003920| 6d 69 6e 65 25 2c f8 20 | 6d 69 6e 65 73 25 2c f8 |mine%,. |mines%,.|
|00003930| 20 66 6c 61 67 73 25 29 | 0d 13 06 17 ea 20 73 71 | flags%)|..... sq|
|00003940| 75 69 64 67 65 25 2c 6d | 78 2c 6d 79 2c 6d 62 0d |uidge%,m|x,my,mb.|
|00003950| 13 10 1f e7 20 3f 28 6d | 69 6e 65 25 2b 63 65 6c |.... ?(m|ine%+cel|
|00003960| 6c 25 2d 31 29 20 80 20 | 25 31 30 30 20 8c 0d 13 |l%-1) . |%100 ...|
|00003970| 1a 0f 20 20 66 6c 61 67 | 73 25 2b 3d 31 0d 13 24 |.. flag|s%+=1..$|
|00003980| 26 20 20 e7 20 3f 28 6d | 69 6e 65 25 2b 63 65 6c |& . ?(m|ine%+cel|
|00003990| 6c 25 2d 31 29 20 80 20 | 31 20 6d 69 6e 65 73 25 |l%-1) . |1 mines%|
|000039a0| 2b 3d 31 0d 13 2e 2f 20 | 20 3f 28 6d 69 6e 65 25 |+=1.../ | ?(mine%|
|000039b0| 2b 63 65 6c 6c 25 2d 31 | 29 3d 3f 28 6d 69 6e 65 |+cell%-1|)=?(mine|
|000039c0| 25 2b 63 65 6c 6c 25 2d | 31 29 20 80 20 25 31 30 |%+cell%-|1) . %10|
|000039d0| 31 31 0d 13 38 41 20 20 | e6 32 2c 25 31 31 30 30 |11..8A |.2,%1100|
|000039e0| 3a 73 71 75 69 64 67 65 | 25 3d 30 3a f2 66 69 6c |:squidge|%=0:.fil|
|000039f0| 6c 72 65 67 69 6f 6e 28 | 70 74 28 29 2c 76 65 72 |lregion(|pt(),ver|
|00003a00| 74 28 29 2c 63 65 6c 6c | 25 2c 73 71 75 69 64 67 |t(),cell|%,squidg|
|00003a10| 65 25 29 0d 13 42 3b 20 | 20 e6 30 2c 30 3a 73 71 |e%)..B; | .0,0:sq|
|00003a20| 75 69 64 67 65 25 3d 30 | 3a f2 64 72 61 77 61 62 |uidge%=0|:.drawab|
|00003a30| 6f 75 6e 64 61 72 79 28 | 76 65 72 74 28 29 2c 63 |oundary(|vert(),c|
|00003a40| 65 6c 6c 25 2c 73 71 75 | 69 64 67 65 25 29 0d 13 |ell%,squ|idge%)..|
|00003a50| 4c 06 20 cc 0d 13 56 0f | 20 20 66 6c 61 67 73 25 |L. ...V.| flags%|
|00003a60| 2d 3d 31 0d 13 60 26 20 | 20 e7 20 3f 28 6d 69 6e |-=1..`& | . ?(min|
|00003a70| 65 25 2b 63 65 6c 6c 25 | 2d 31 29 20 80 20 31 20 |e%+cell%|-1) . 1 |
|00003a80| 6d 69 6e 65 73 25 2d 3d | 31 0d 13 6a 2e 20 20 3f |mines%-=|1..j. ?|
|00003a90| 28 6d 69 6e 65 25 2b 63 | 65 6c 6c 25 2d 31 29 3d |(mine%+c|ell%-1)=|
|00003aa0| 3f 28 6d 69 6e 65 25 2b | 63 65 6c 6c 25 2d 31 29 |?(mine%+|cell%-1)|
|00003ab0| 20 84 20 25 31 30 30 0d | 13 74 3f 20 20 e6 31 2c | . %100.|.t? .1,|
|00003ac0| 25 31 30 3a 73 71 75 69 | 64 67 65 25 3d 30 3a f2 |%10:squi|dge%=0:.|
|00003ad0| 66 69 6c 6c 72 65 67 69 | 6f 6e 28 70 74 28 29 2c |fillregi|on(pt(),|
|00003ae0| 76 65 72 74 28 29 2c 63 | 65 6c 6c 25 2c 73 71 75 |vert(),c|ell%,squ|
|00003af0| 69 64 67 65 25 29 0d 13 | 7e 3b 20 20 e6 30 2c 30 |idge%)..|~; .0,0|
|00003b00| 3a 73 71 75 69 64 67 65 | 25 3d 30 3a f2 64 72 61 |:squidge|%=0:.dra|
|00003b10| 77 61 62 6f 75 6e 64 61 | 72 79 28 76 65 72 74 28 |wabounda|ry(vert(|
|00003b20| 29 2c 63 65 6c 6c 25 2c | 73 71 75 69 64 67 65 25 |),cell%,|squidge%|
|00003b30| 29 0d 13 88 06 20 cd 0d | 13 92 17 f5 20 c8 97 6d |).... ..|.... ..m|
|00003b40| 78 2c 6d 79 2c 6d 62 3a | fd 20 6d 62 3d 30 0d 13 |x,my,mb:|. mb=0..|
|00003b50| 9c 05 e1 0d 13 a6 05 3a | 0d 13 b0 29 dd 20 f2 71 |.......:|...). .q|
|00003b60| 75 65 72 79 63 65 6c 6c | 28 63 65 6c 6c 25 2c 70 |uerycell|(cell%,p|
|00003b70| 74 28 29 2c 76 65 72 74 | 28 29 2c 6d 69 6e 65 25 |t(),vert|(),mine%|
|00003b80| 29 0d 13 ba 17 ea 20 73 | 71 75 69 64 67 65 25 2c |)..... s|quidge%,|
|00003b90| 6d 78 2c 6d 79 2c 6d 62 | 0d 13 c4 20 e7 20 3f 28 |mx,my,mb|... . ?(|
|00003ba0| 6d 69 6e 65 25 2b 63 65 | 6c 6c 25 2d 31 29 20 80 |mine%+ce|ll%-1) .|
|00003bb0| 20 25 31 30 30 30 20 8c | 0d 13 ce 2e 20 20 3f 28 | %1000 .|.... ?(|
|00003bc0| 6d 69 6e 65 25 2b 63 65 | 6c 6c 25 2d 31 29 3d 3f |mine%+ce|ll%-1)=?|
|00003bd0| 28 6d 69 6e 65 25 2b 63 | 65 6c 6c 25 2d 31 29 20 |(mine%+c|ell%-1) |
|00003be0| 80 20 25 31 31 31 0d 13 | d8 41 20 20 e6 32 2c 25 |. %111..|.A .2,%|
|00003bf0| 31 31 30 30 3a 73 71 75 | 69 64 67 65 25 3d 30 3a |1100:squ|idge%=0:|
|00003c00| f2 66 69 6c 6c 72 65 67 | 69 6f 6e 28 70 74 28 29 |.fillreg|ion(pt()|
|00003c10| 2c 76 65 72 74 28 29 2c | 63 65 6c 6c 25 2c 73 71 |,vert(),|cell%,sq|
|00003c20| 75 69 64 67 65 25 29 0d | 13 e2 3b 20 20 e6 30 2c |uidge%).|..; .0,|
|00003c30| 30 3a 73 71 75 69 64 67 | 65 25 3d 30 3a f2 64 72 |0:squidg|e%=0:.dr|
|00003c40| 61 77 61 62 6f 75 6e 64 | 61 72 79 28 76 65 72 74 |awabound|ary(vert|
|00003c50| 28 29 2c 63 65 6c 6c 25 | 2c 73 71 75 69 64 67 65 |(),cell%|,squidge|
|00003c60| 25 29 0d 13 ec 06 20 cc | 0d 13 f6 2f 20 20 3f 28 |%).... .|.../ ?(|
|00003c70| 6d 69 6e 65 25 2b 63 65 | 6c 6c 25 2d 31 29 3d 3f |mine%+ce|ll%-1)=?|
|00003c80| 28 6d 69 6e 65 25 2b 63 | 65 6c 6c 25 2d 31 29 20 |(mine%+c|ell%-1) |
|00003c90| 84 20 25 31 30 30 30 0d | 14 00 3f 20 20 e6 31 2c |. %1000.|..? .1,|
|00003ca0| 25 31 31 3a 73 71 75 69 | 64 67 65 25 3d 30 3a f2 |%11:squi|dge%=0:.|
|00003cb0| 66 69 6c 6c 72 65 67 69 | 6f 6e 28 70 74 28 29 2c |fillregi|on(pt(),|
|00003cc0| 76 65 72 74 28 29 2c 63 | 65 6c 6c 25 2c 73 71 75 |vert(),c|ell%,squ|
|00003cd0| 69 64 67 65 25 29 0d 14 | 0a 3b 20 20 e6 30 2c 30 |idge%)..|.; .0,0|
|00003ce0| 3a 73 71 75 69 64 67 65 | 25 3d 30 3a f2 64 72 61 |:squidge|%=0:.dra|
|00003cf0| 77 61 62 6f 75 6e 64 61 | 72 79 28 76 65 72 74 28 |wabounda|ry(vert(|
|00003d00| 29 2c 63 65 6c 6c 25 2c | 73 71 75 69 64 67 65 25 |),cell%,|squidge%|
|00003d10| 29 0d 14 14 06 20 cd 0d | 14 1e 17 f5 20 c8 97 6d |).... ..|.... ..m|
|00003d20| 78 2c 6d 79 2c 6d 62 3a | fd 20 6d 62 3d 30 0d 14 |x,my,mb:|. mb=0..|
|00003d30| 28 05 e1 0d 14 32 05 3a | 0d 14 3c 29 dd 20 f2 62 |(....2.:|..<). .b|
|00003d40| 6f 6f 6d 28 70 74 73 28 | 29 2c 6e 70 74 73 25 2c |oom(pts(|),npts%,|
|00003d50| 66 6c 61 67 6c 69 73 74 | 25 2c 66 6c 61 67 73 25 |flaglist|%,flags%|
|00003d60| 29 0d 14 46 15 ea 20 70 | 6f 69 6e 74 25 2c 63 6f |)..F.. p|oint%,co|
|00003d70| 72 72 65 63 74 25 0d 14 | 50 06 ef 35 0d 14 5a 0e |rrect%..|P..5..Z.|
|00003d80| 63 6f 72 72 65 63 74 25 | 3d 30 0d 14 64 16 e3 20 |correct%|=0..d.. |
|00003d90| 70 6f 69 6e 74 25 3d 31 | 20 b8 20 6e 70 74 73 25 |point%=1| . npts%|
|00003da0| 0d 14 6e 22 20 20 e7 20 | 66 6c 61 67 6c 69 73 74 |..n" . |flaglist|
|00003db0| 25 3f 28 70 6f 69 6e 74 | 25 2d 31 29 20 80 20 31 |%?(point|%-1) . 1|
|00003dc0| 20 8c 0d 14 78 3b 20 20 | 20 20 e7 20 66 6c 61 67 | ...x; | . flag|
|00003dd0| 6c 69 73 74 25 3f 28 70 | 6f 69 6e 74 25 2d 31 29 |list%?(p|oint%-1)|
|00003de0| 20 80 20 34 20 e6 30 2c | 31 34 3a 63 6f 72 72 65 | . 4 .0,|14:corre|
|00003df0| 63 74 25 2b 3d 31 20 8b | 20 e6 30 2c 32 0d 14 82 |ct%+=1 .| .0,2...|
|00003e00| 3e 20 20 20 20 ec 70 74 | 73 28 70 6f 69 6e 74 25 |> .pt|s(point%|
|00003e10| 2c 30 29 2d 34 2a 78 73 | 63 61 6c 65 25 2c 70 74 |,0)-4*xs|cale%,pt|
|00003e20| 73 28 70 6f 69 6e 74 25 | 2c 31 29 2b 34 2a 79 73 |s(point%|,1)+4*ys|
|00003e30| 63 61 6c 65 25 3a f1 22 | 4d 22 3b 0d 14 8c 08 20 |cale%:."|M";.... |
|00003e40| 20 20 cd 0d 14 96 06 20 | ed 0d 14 a0 08 ef 34 3a | ..... |......4:|
|00003e50| 87 0d 14 aa 06 fb 32 0d | 14 b4 1b f2 63 65 6e 74 |......2.|....cent|
|00003e60| 72 65 28 22 47 41 4d 45 | 20 20 4f 56 45 52 22 2c |re("GAME| OVER",|
|00003e70| 31 29 0d 14 be 06 fb 31 | 0d 14 c8 27 f2 63 65 6e |1).....1|...'.cen|
|00003e80| 74 72 65 28 22 46 6c 61 | 67 73 20 6c 65 66 74 3a |tre("Fla|gs left:|
|00003e90| 20 22 2b c3 28 66 6c 61 | 67 73 25 29 2c 32 29 0d | "+.(fla|gs%),2).|
|00003ea0| 14 d2 a0 e7 20 63 6f 72 | 72 65 63 74 25 3d 30 20 |.... cor|rect%=0 |
|00003eb0| f2 63 65 6e 74 72 65 28 | 22 4e 6f 20 63 6f 72 72 |.centre(|"No corr|
|00003ec0| 65 63 74 6c 79 20 66 6c | 61 67 67 65 64 20 6d 69 |ectly fl|agged mi|
|00003ed0| 6e 65 73 22 2c 33 29 20 | 8b 20 e7 20 63 6f 72 72 |nes",3) |. . corr|
|00003ee0| 65 63 74 25 3d 31 20 f2 | 63 65 6e 74 72 65 28 22 |ect%=1 .|centre("|
|00003ef0| 31 20 63 6f 72 72 65 63 | 74 6c 79 20 70 6c 61 63 |1 correc|tly plac|
|00003f00| 65 64 20 6d 69 6e 65 22 | 2c 33 29 20 8b 20 f2 63 |ed mine"|,3) . .c|
|00003f10| 65 6e 74 72 65 28 c3 28 | 63 6f 72 72 65 63 74 25 |entre(.(|correct%|
|00003f20| 29 2b 22 20 63 6f 72 72 | 65 63 74 6c 79 20 66 6c |)+" corr|ectly fl|
|00003f30| 61 67 67 65 64 20 6d 69 | 6e 65 73 22 2c 33 29 0d |agged mi|nes",3).|
|00003f40| 14 dc 05 e1 0d 14 e6 05 | 3a 0d 14 f0 1a dd 20 f2 |........|:..... .|
|00003f50| 63 6f 6e 67 72 61 74 75 | 6c 61 74 65 28 74 69 6d |congratu|late(tim|
|00003f60| 65 25 29 0d 14 fa 2c ea | 20 78 6d 75 6c 74 2c 79 |e%)...,.| xmult,y|
|00003f70| 6d 75 6c 74 2c 74 69 6d | 65 68 65 72 65 25 2c 61 |mult,tim|ehere%,a|
|00003f80| 6d 6f 75 6e 74 64 6f 6e | 65 2c 74 69 6d 65 24 0d |mountdon|e,time$.|
|00003f90| 15 04 19 78 6d 75 6c 74 | 3d 28 78 6d 61 78 2d 78 |...xmult|=(xmax-x|
|00003fa0| 6d 69 6e 29 2a 2e 33 32 | 0d 15 0e 1e 79 6d 75 6c |min)*.32|....ymul|
|00003fb0| 74 3d 28 79 6d 61 78 2b | 33 32 2a 79 73 63 61 6c |t=(ymax+|32*yscal|
|00003fc0| 65 25 29 2a 2e 34 0d 15 | 18 26 db 3a 87 3a e6 30 |e%)*.4..|.&.:.:.0|
|00003fd0| 2c 33 3a fb 33 2c 32 35 | 35 2c 32 34 30 2c 30 3a |,3:.3,25|5,240,0:|
|00003fe0| fb 32 2c 31 32 37 2c 31 | 34 33 2c 30 0d 15 22 0f |.2,127,1|43,0..".|
|00003ff0| 74 69 6d 65 68 65 72 65 | 25 3d 91 0d 15 2c 05 f5 |timehere|%=...,..|
|00004000| 0d 15 36 22 20 20 61 6d | 6f 75 6e 74 64 6f 6e 65 |..6" am|ountdone|
|00004010| 3d 28 91 2d 74 69 6d 65 | 68 65 72 65 25 29 2f 31 |=(.-time|here%)/1|
|00004020| 30 30 0d 15 40 4c 20 20 | ec 28 78 6d 61 78 2b 78 |00..@L |.(xmax+x|
|00004030| 6d 69 6e 29 2f 32 2b 61 | 6d 6f 75 6e 74 64 6f 6e |min)/2+a|mountdon|
|00004040| 65 2a 78 6d 75 6c 74 2a | b5 b2 30 2c 28 79 6d 61 |e*xmult*|..0,(yma|
|00004050| 78 2b 79 6d 69 6e 29 2f | 32 2b 61 6d 6f 75 6e 74 |x+ymin)/|2+amount|
|00004060| 64 6f 6e 65 2a 79 6d 75 | 6c 74 2a 9b b2 30 0d 15 |done*ymu|lt*..0..|
|00004070| 4a 50 20 20 ec 28 78 6d | 61 78 2b 78 6d 69 6e 29 |JP .(xm|ax+xmin)|
|00004080| 2f 32 2b 61 6d 6f 75 6e | 74 64 6f 6e 65 2a 78 6d |/2+amoun|tdone*xm|
|00004090| 75 6c 74 2a b5 b2 31 32 | 30 2c 28 79 6d 61 78 2b |ult*..12|0,(ymax+|
|000040a0| 79 6d 69 6e 29 2f 32 2b | 61 6d 6f 75 6e 74 64 6f |ymin)/2+|amountdo|
|000040b0| 6e 65 2a 79 6d 75 6c 74 | 2a 9b b2 31 32 30 0d 15 |ne*ymult|*..120..|
|000040c0| 54 53 20 20 f0 38 35 2c | 28 78 6d 61 78 2b 78 6d |TS .85,|(xmax+xm|
|000040d0| 69 6e 29 2f 32 2b 61 6d | 6f 75 6e 74 64 6f 6e 65 |in)/2+am|ountdone|
|000040e0| 2a 78 6d 75 6c 74 2a b5 | b2 32 34 30 2c 28 79 6d |*xmult*.|.240,(ym|
|000040f0| 61 78 2b 79 6d 69 6e 29 | 2f 32 2b 61 6d 6f 75 6e |ax+ymin)|/2+amoun|
|00004100| 74 64 6f 6e 65 2a 79 6d | 75 6c 74 2a 9b b2 32 34 |tdone*ym|ult*..24|
|00004110| 30 0d 15 5e 4e 20 20 ec | 28 78 6d 61 78 2b 78 6d |0..^N .|(xmax+xm|
|00004120| 69 6e 29 2f 32 2b 61 6d | 6f 75 6e 74 64 6f 6e 65 |in)/2+am|ountdone|
|00004130| 2a 78 6d 75 6c 74 2a b5 | b2 36 30 2c 28 79 6d 61 |*xmult*.|.60,(yma|
|00004140| 78 2b 79 6d 69 6e 29 2f | 32 2b 61 6d 6f 75 6e 74 |x+ymin)/|2+amount|
|00004150| 64 6f 6e 65 2a 79 6d 75 | 6c 74 2a 9b b2 36 30 0d |done*ymu|lt*..60.|
|00004160| 15 68 50 20 20 ec 28 78 | 6d 61 78 2b 78 6d 69 6e |.hP .(x|max+xmin|
|00004170| 29 2f 32 2b 61 6d 6f 75 | 6e 74 64 6f 6e 65 2a 78 |)/2+amou|ntdone*x|
|00004180| 6d 75 6c 74 2a b5 b2 31 | 38 30 2c 28 79 6d 61 78 |mult*..1|80,(ymax|
|00004190| 2b 79 6d 69 6e 29 2f 32 | 2b 61 6d 6f 75 6e 74 64 |+ymin)/2|+amountd|
|000041a0| 6f 6e 65 2a 79 6d 75 6c | 74 2a 9b b2 31 38 30 0d |one*ymul|t*..180.|
|000041b0| 15 72 53 20 20 f0 38 35 | 2c 28 78 6d 61 78 2b 78 |.rS .85|,(xmax+x|
|000041c0| 6d 69 6e 29 2f 32 2b 61 | 6d 6f 75 6e 74 64 6f 6e |min)/2+a|mountdon|
|000041d0| 65 2a 78 6d 75 6c 74 2a | b5 b2 33 30 30 2c 28 79 |e*xmult*|..300,(y|
|000041e0| 6d 61 78 2b 79 6d 69 6e | 29 2f 32 2b 61 6d 6f 75 |max+ymin|)/2+amou|
|000041f0| 6e 74 64 6f 6e 65 2a 79 | 6d 75 6c 74 2a 9b b2 33 |ntdone*y|mult*..3|
|00004200| 30 30 0d 15 7c 17 20 fd | 20 91 2d 74 69 6d 65 68 |00..|. .| .-timeh|
|00004210| 65 72 65 25 3e 3d 31 30 | 30 0d 15 86 58 e6 30 2c |ere%>=10|0...X.0,|
|00004220| 32 3a ef 35 3a ec 28 78 | 6d 61 78 2b 78 6d 69 6e |2:.5:.(x|max+xmin|
|00004230| 29 2f 32 2d 34 2a 78 73 | 63 61 6c 65 25 2a a9 28 |)/2-4*xs|cale%*.(|
|00004240| 22 57 65 6c 6c 20 64 6f | 6e 65 22 29 2c 28 79 6d |"Well do|ne"),(ym|
|00004250| 61 78 2b 79 6d 69 6e 29 | 2f 32 2b 38 2a 79 73 63 |ax+ymin)|/2+8*ysc|
|00004260| 61 6c 65 25 3a f1 22 57 | 65 6c 6c 20 64 6f 6e 65 |ale%:."W|ell done|
|00004270| 22 0d 15 90 24 74 69 6d | 65 24 3d 22 54 69 6d 65 |"...$tim|e$="Time|
|00004280| 3a 22 2b c3 28 74 69 6d | 65 25 20 81 20 31 30 30 |:"+.(tim|e% . 100|
|00004290| 29 2b 22 73 22 0d 15 9a | 3a ec 28 78 6d 61 78 2b |)+"s"...|:.(xmax+|
|000042a0| 78 6d 69 6e 29 2f 32 2d | 34 2a 78 73 63 61 6c 65 |xmin)/2-|4*xscale|
|000042b0| 25 2a a9 28 74 69 6d 65 | 24 29 2c 28 79 6d 61 78 |%*.(time|$),(ymax|
|000042c0| 2b 79 6d 69 6e 29 2f 32 | 3a f1 74 69 6d 65 24 0d |+ymin)/2|:.time$.|
|000042d0| 15 a4 08 ef 34 3a 87 0d | 15 ae 05 e1 0d 15 b8 05 |....4:..|........|
|000042e0| 3a 0d 15 c2 42 dd 20 f2 | 69 6e 74 65 72 61 63 74 |:...B. .|interact|
|000042f0| 28 70 74 73 28 29 2c 76 | 65 72 74 69 63 65 73 28 |(pts(),v|ertices(|
|00004300| 29 2c 6e 70 74 73 25 2c | 63 6f 6e 6e 65 63 74 25 |),npts%,|connect%|
|00004310| 2c 66 6c 61 67 6c 69 73 | 74 25 2c 6e 6d 69 6e 65 |,flaglis|t%,nmine|
|00004320| 73 25 29 0d 15 cc 4c ea | 20 63 6c 6f 73 65 73 74 |s%)...L.| closest|
|00004330| 25 2c 6e 65 77 63 6c 6f | 73 65 73 74 25 2c 78 2c |%,newclo|sest%,x,|
|00004340| 79 2c 62 2c 76 25 2c 76 | 32 25 2c 74 76 25 2c 63 |y,b,v%,v|2%,tv%,c|
|00004350| 6f 75 6e 74 65 72 25 2c | 62 6f 6f 6d 25 2c 6e 65 |ounter%,|boom%,ne|
|00004360| 65 64 75 70 64 61 74 65 | 25 2c 74 69 6d 65 25 0d |edupdate|%,time%.|
|00004370| 15 d6 22 66 6c 61 67 73 | 25 3d 6e 6d 69 6e 65 73 |.."flags|%=nmines|
|00004380| 25 3a 62 6f 6f 6d 25 3d | a3 3a 64 6f 6e 65 25 3d |%:boom%=|.:done%=|
|00004390| a3 0d 15 e0 07 c8 97 ee | 0d 15 ea 1b f2 70 6f 73 |........|.....pos|
|000043a0| 68 74 69 74 6c 65 28 22 | 43 52 41 5a 59 4d 49 4e |htitle("|CRAZYMIN|
|000043b0| 45 22 29 0d 15 f4 0b c8 | 97 78 2c 79 2c 62 0d 15 |E").....|.x,y,b..|
|000043c0| fe 2a 63 6c 6f 73 65 73 | 74 25 3d a4 66 69 6e 64 |.*closes|t%=.find|
|000043d0| 63 6c 6f 73 65 73 74 28 | 70 74 73 28 29 2c 6e 70 |closest(|pts(),np|
|000043e0| 74 73 25 2c 78 2c 79 29 | 0d 16 08 0b 74 69 6d 65 |ts%,x,y)|....time|
|000043f0| 25 3d 91 0d 16 12 05 f5 | 0d 16 1c 3a 20 20 f2 68 |%=......|...: .h|
|00004400| 69 67 68 6c 69 67 68 74 | 28 70 74 73 28 29 2c 76 |ighlight|(pts(),v|
|00004410| 65 72 74 69 63 65 73 28 | 29 2c 6e 70 74 73 25 2c |ertices(|),npts%,|
|00004420| 63 6c 6f 73 65 73 74 25 | 2c 63 6f 6e 6e 65 63 74 |closest%|,connect|
|00004430| 25 29 0d 16 26 13 20 20 | 6e 65 65 64 75 70 64 61 |%)..&. |needupda|
|00004440| 74 65 25 3d b9 0d 16 30 | 07 20 20 f5 0d 16 3a 0f |te%=...0|. ...:.|
|00004450| 20 20 20 20 c8 97 78 2c | 79 2c 62 0d 16 44 5b 20 | ..x,|y,b..D[ |
|00004460| 20 20 20 e7 20 6e 65 65 | 64 75 70 64 61 74 65 25 | . nee|dupdate%|
|00004470| 20 f2 75 70 64 61 74 65 | 62 61 6e 6e 65 72 28 63 | .update|banner(c|
|00004480| 6c 6f 73 65 73 74 25 2c | 63 6f 6e 6e 65 63 74 25 |losest%,|connect%|
|00004490| 2c 6e 70 74 73 25 2c 66 | 6c 61 67 6c 69 73 74 25 |,npts%,f|laglist%|
|000044a0| 2c 66 6c 61 67 73 25 29 | 3a 6e 65 65 64 75 70 64 |,flags%)|:needupd|
|000044b0| 61 74 65 25 3d a3 0d 16 | 4e 31 20 20 20 20 6e 65 |ate%=...|N1 ne|
|000044c0| 77 63 6c 6f 73 65 73 74 | 25 3d a4 66 69 6e 64 63 |wclosest|%=.findc|
|000044d0| 6c 6f 73 65 73 74 28 70 | 74 73 28 29 2c 6e 70 74 |losest(p|ts(),npt|
|000044e0| 73 25 2c 78 2c 79 29 0d | 16 58 20 20 20 20 20 e7 |s%,x,y).|.X .|
|000044f0| 20 6e 65 77 63 6c 6f 73 | 65 73 74 25 3d 63 6c 6f | newclos|est%=clo|
|00004500| 73 65 73 74 25 20 8c 0d | 16 62 10 20 20 20 20 20 |sest% ..|.b. |
|00004510| 20 c8 8e 20 62 20 ca 0d | 16 6c 88 20 20 20 20 20 | .. b ..|.l. |
|00004520| 20 20 c9 20 34 3a e7 20 | 28 28 66 6c 61 67 6c 69 | . 4:. |((flagli|
|00004530| 73 74 25 3f 28 63 6c 6f | 73 65 73 74 25 2d 31 29 |st%?(clo|sest%-1)|
|00004540| 20 80 20 25 31 31 31 30 | 29 3d 30 29 20 f2 63 6c | . %1110|)=0) .cl|
|00004550| 65 61 72 63 65 6c 6c 28 | 63 6c 6f 73 65 73 74 25 |earcell(|closest%|
|00004560| 2c 70 74 73 28 29 2c 76 | 65 72 74 69 63 65 73 28 |,pts(),v|ertices(|
|00004570| 29 2c 6e 70 74 73 25 2c | 63 6f 6e 6e 65 63 74 25 |),npts%,|connect%|
|00004580| 2c 66 6c 61 67 6c 69 73 | 74 25 2c 62 6f 6f 6d 25 |,flaglis|t%,boom%|
|00004590| 29 3a 6e 65 65 64 75 70 | 64 61 74 65 25 3d b9 0d |):needup|date%=..|
|000045a0| 16 76 73 20 20 20 20 20 | 20 20 c9 20 32 3a e7 20 |.vs | . 2:. |
|000045b0| 28 28 66 6c 61 67 6c 69 | 73 74 25 3f 28 63 6c 6f |((flagli|st%?(clo|
|000045c0| 73 65 73 74 25 2d 31 29 | 20 80 20 25 30 31 31 30 |sest%-1)| . %0110|
|000045d0| 29 3d 30 29 20 f2 71 75 | 65 72 79 63 65 6c 6c 28 |)=0) .qu|erycell(|
|000045e0| 63 6c 6f 73 65 73 74 25 | 2c 70 74 73 28 29 2c 76 |closest%|,pts(),v|
|000045f0| 65 72 74 69 63 65 73 28 | 29 2c 66 6c 61 67 6c 69 |ertices(|),flagli|
|00004600| 73 74 25 29 3a 6e 65 65 | 64 75 70 64 61 74 65 25 |st%):nee|dupdate%|
|00004610| 3d b9 0d 16 80 81 20 20 | 20 20 20 20 20 c9 20 31 |=..... | . 1|
|00004620| 3a e7 20 28 28 66 6c 61 | 67 6c 69 73 74 25 3f 28 |:. ((fla|glist%?(|
|00004630| 63 6c 6f 73 65 73 74 25 | 2d 31 29 20 80 20 25 31 |closest%|-1) . %1|
|00004640| 30 31 30 29 3d 30 29 20 | f2 66 6c 61 67 63 65 6c |010)=0) |.flagcel|
|00004650| 6c 28 63 6c 6f 73 65 73 | 74 25 2c 70 74 73 28 29 |l(closes|t%,pts()|
|00004660| 2c 76 65 72 74 69 63 65 | 73 28 29 2c 66 6c 61 67 |,vertice|s(),flag|
|00004670| 6c 69 73 74 25 2c 6e 6d | 69 6e 65 73 25 2c 66 6c |list%,nm|ines%,fl|
|00004680| 61 67 73 25 29 3a 6e 65 | 65 64 75 70 64 61 74 65 |ags%):ne|edupdate|
|00004690| 25 3d b9 0d 16 8a 0b 20 | 20 20 20 20 20 cb 0d 16 |%=..... | ...|
|000046a0| 94 0a 20 20 20 20 20 cd | 0d 16 9e 30 20 20 20 fd |.. .|...0 .|
|000046b0| 6e 65 77 63 6c 6f 73 65 | 73 74 25 3c 3e 63 6c 6f |newclose|st%<>clo|
|000046c0| 73 65 73 74 25 20 84 20 | 66 6c 61 67 73 25 3d 30 |sest% . |flags%=0|
|000046d0| 20 84 20 62 6f 6f 6d 25 | 0d 16 a8 3c 20 20 f2 75 | . boom%|...< .u|
|000046e0| 6e 68 69 67 68 6c 69 67 | 68 74 28 70 74 73 28 29 |nhighlig|ht(pts()|
|000046f0| 2c 76 65 72 74 69 63 65 | 73 28 29 2c 6e 70 74 73 |,vertice|s(),npts|
|00004700| 25 2c 63 6c 6f 73 65 73 | 74 25 2c 63 6f 6e 6e 65 |%,closes|t%,conne|
|00004710| 63 74 25 29 0d 16 b2 1a | 20 20 63 6c 6f 73 65 73 |ct%)....| closes|
|00004720| 74 25 3d 6e 65 77 63 6c | 6f 73 65 73 74 25 0d 16 |t%=newcl|osest%..|
|00004730| bc 52 20 20 e7 20 28 66 | 6c 61 67 73 25 3d 30 20 |.R . (f|lags%=0 |
|00004740| 80 20 6e 6d 69 6e 65 73 | 25 3e 30 29 20 84 20 62 |. nmines|%>0) . b|
|00004750| 6f 6f 6d 25 20 f2 62 6f | 6f 6d 28 70 74 73 28 29 |oom% .bo|om(pts()|
|00004760| 2c 6e 70 74 73 25 2c 66 | 6c 61 67 6c 69 73 74 25 |,npts%,f|laglist%|
|00004770| 2c 66 6c 61 67 73 25 29 | 3a 64 6f 6e 65 25 3d b9 |,flags%)|:done%=.|
|00004780| 0d 16 c6 3b 20 20 e7 20 | 66 6c 61 67 73 25 3d 30 |...; . |flags%=0|
|00004790| 20 80 20 6e 6d 69 6e 65 | 73 25 3d 30 20 f2 63 6f | . nmine|s%=0 .co|
|000047a0| 6e 67 72 61 74 75 6c 61 | 74 65 28 91 2d 74 69 6d |ngratula|te(.-tim|
|000047b0| 65 25 29 3a 64 6f 6e 65 | 25 3d b9 0d 16 d0 0b 20 |e%):done|%=..... |
|000047c0| fd 64 6f 6e 65 25 0d 16 | da 05 e1 0d 16 e4 05 3a |.done%..|.......:|
|000047d0| 0d 16 ee 5a dd 20 f2 67 | 65 74 73 63 72 65 65 6e |...Z. .g|etscreen|
|000047e0| 69 6e 66 6f 28 f8 20 78 | 73 63 61 6c 65 2c f8 20 |info(. x|scale,. |
|000047f0| 79 73 63 61 6c 65 2c f8 | 20 78 6d 69 6e 2c f8 20 |yscale,.| xmin,. |
|00004800| 78 6d 61 78 2c f8 20 79 | 6d 69 6e 2c f8 20 79 6d |xmax,. y|min,. ym|
|00004810| 61 78 2c f8 20 74 6f 70 | 62 6f 72 64 65 72 2c f8 |ax,. top|border,.|
|00004820| 20 6d 69 6e 5f 64 69 73 | 74 29 0d 16 f8 11 ea 20 | min_dis|t)..... |
|00004830| 78 45 69 67 25 2c 79 45 | 69 67 25 0d 17 02 2a c8 |xEig%,yE|ig%...*.|
|00004840| 99 22 4f 53 5f 52 65 61 | 64 4d 6f 64 65 56 61 72 |."OS_Rea|dModeVar|
|00004850| 69 61 62 6c 65 22 2c 2d | 31 2c 31 20 b8 20 2c 2c |iable",-|1,1 . ,,|
|00004860| 78 63 6f 6c 25 0d 17 0c | 2a c8 99 22 4f 53 5f 52 |xcol%...|*.."OS_R|
|00004870| 65 61 64 4d 6f 64 65 56 | 61 72 69 61 62 6c 65 22 |eadModeV|ariable"|
|00004880| 2c 2d 31 2c 34 20 b8 20 | 2c 2c 78 45 69 67 25 0d |,-1,4 . |,,xEig%.|
|00004890| 17 16 13 78 73 63 61 6c | 65 3d 31 3c 3c 78 45 69 |...xscal|e=1<<xEi|
|000048a0| 67 25 0d 17 20 1d 78 6d | 61 78 3d 28 78 63 6f 6c |g%.. .xm|ax=(xcol|
|000048b0| 25 2b 31 29 2a 38 2a 78 | 73 63 61 6c 65 2d 31 0d |%+1)*8*x|scale-1.|
|000048c0| 17 2a 2a c8 99 22 4f 53 | 5f 52 65 61 64 4d 6f 64 |.**.."OS|_ReadMod|
|000048d0| 65 56 61 72 69 61 62 6c | 65 22 2c 2d 31 2c 32 20 |eVariabl|e",-1,2 |
|000048e0| b8 20 2c 2c 79 72 6f 77 | 25 0d 17 34 2a c8 99 22 |. ,,yrow|%..4*.."|
|000048f0| 4f 53 5f 52 65 61 64 4d | 6f 64 65 56 61 72 69 61 |OS_ReadM|odeVaria|
|00004900| 62 6c 65 22 2c 2d 31 2c | 35 20 b8 20 2c 2c 79 45 |ble",-1,|5 . ,,yE|
|00004910| 69 67 25 0d 17 3e 13 79 | 73 63 61 6c 65 3d 31 3c |ig%..>.y|scale=1<|
|00004920| 3c 79 45 69 67 25 0d 17 | 48 1d 79 6d 61 78 3d 28 |<yEig%..|H.ymax=(|
|00004930| 79 72 6f 77 25 2b 31 29 | 2a 38 2a 79 73 63 61 6c |yrow%+1)|*8*yscal|
|00004940| 65 2d 31 0d 17 52 18 74 | 6f 70 62 6f 72 64 65 72 |e-1..R.t|opborder|
|00004950| 3d 34 2a 38 2a 79 73 63 | 61 6c 65 0d 17 5c 17 79 |=4*8*ysc|ale..\.y|
|00004960| 6d 61 78 3d 79 6d 61 78 | 2d 74 6f 70 62 6f 72 64 |max=ymax|-topbord|
|00004970| 65 72 0d 17 66 0a 78 6d | 69 6e 3d 30 0d 17 70 0a |er..f.xm|in=0..p.|
|00004980| 79 6d 69 6e 3d 30 0d 17 | 7a 37 62 6f 72 64 65 72 |ymin=0..|z7border|
|00004990| 3d 32 2a 38 2a 28 79 73 | 63 61 6c 65 2b 28 79 73 |=2*8*(ys|cale+(ys|
|000049a0| 63 61 6c 65 3e 78 73 63 | 61 6c 65 29 2a 28 79 73 |cale>xsc|ale)*(ys|
|000049b0| 63 61 6c 65 2d 78 73 63 | 61 6c 65 29 29 0d 17 84 |cale-xsc|ale))...|
|000049c0| 15 6d 69 6e 5f 64 69 73 | 74 3d 62 6f 72 64 65 72 |.min_dis|t=border|
|000049d0| 2f 32 0d 17 8e 05 e1 0d | 17 98 05 3a 0d 17 a2 37 |/2......|...:...7|
|000049e0| dd 20 f2 75 70 64 61 74 | 65 62 61 6e 6e 65 72 28 |. .updat|ebanner(|
|000049f0| 63 65 6c 6c 25 2c 63 6f | 6e 6e 25 2c 6e 70 74 73 |cell%,co|nn%,npts|
|00004a00| 25 2c 66 6c 61 67 6c 69 | 73 74 25 2c 66 6c 61 67 |%,flagli|st%,flag|
|00004a10| 73 25 29 0d 17 ac 2c ea | 20 74 65 73 74 63 65 6c |s%)...,.| testcel|
|00004a20| 6c 25 2c 73 75 72 72 6d | 69 6e 65 73 25 2c 6e 65 |l%,surrm|ines%,ne|
|00004a30| 69 67 68 62 6f 75 72 73 | 25 2c 69 6e 66 6f 24 0d |ighbours|%,info$.|
|00004a40| 17 b6 06 fb 31 0d 17 c0 | 11 6e 65 69 67 68 62 6f |....1...|.neighbo|
|00004a50| 75 72 73 25 3d 30 0d 17 | ca 10 73 75 72 72 6d 69 |urs%=0..|..surrmi|
|00004a60| 6e 65 73 25 3d 30 0d 17 | d4 19 e3 20 74 65 73 74 |nes%=0..|... test|
|00004a70| 63 65 6c 6c 25 3d 31 20 | b8 20 6e 70 74 73 25 0d |cell%=1 |. npts%.|
|00004a80| 17 de 1a 20 20 e7 20 74 | 65 73 74 63 65 6c 6c 25 |... . t|estcell%|
|00004a90| 3c 3e 63 65 6c 6c 25 20 | 8c 0d 17 e8 33 20 20 20 |<>cell% |....3 |
|00004aa0| 20 e7 20 a4 63 65 6c 6c | 63 6f 6e 6e 65 63 74 28 | . .cell|connect(|
|00004ab0| a3 2c 30 2c 63 65 6c 6c | 25 2c 74 65 73 74 63 65 |.,0,cell|%,testce|
|00004ac0| 6c 6c 25 2c 63 6f 6e 6e | 25 29 20 8c 0d 17 f2 38 |ll%,conn|%) ....8|
|00004ad0| 20 20 20 20 20 20 e7 20 | 3f 28 66 6c 61 67 6c 69 | . |?(flagli|
|00004ae0| 73 74 25 2b 74 65 73 74 | 63 65 6c 6c 25 2d 31 29 |st%+test|cell%-1)|
|00004af0| 20 80 20 31 20 8c 20 73 | 75 72 72 6d 69 6e 65 73 | . 1 . s|urrmines|
|00004b00| 25 2b 3d 31 0d 17 fc 18 | 20 20 20 20 20 20 6e 65 |%+=1....| ne|
|00004b10| 69 67 68 62 6f 75 72 73 | 25 2b 3d 31 0d 18 06 0a |ighbours|%+=1....|
|00004b20| 20 20 20 20 20 cd 0d 18 | 10 08 20 20 20 cd 0d 18 | ...|.. ...|
|00004b30| 1a 06 20 ed 0d 18 24 1c | 69 6e 66 6f 24 3d 22 43 |.. ...$.|info$="C|
|00004b40| 75 72 72 65 6e 74 20 63 | 65 6c 6c 20 69 73 20 22 |urrent c|ell is "|
|00004b50| 0d 18 2e 25 c8 8e 20 3f | 28 66 6c 61 67 6c 69 73 |...%.. ?|(flaglis|
|00004b60| 74 25 2b 63 65 6c 6c 25 | 2d 31 29 20 80 20 25 31 |t%+cell%|-1) . %1|
|00004b70| 31 31 30 20 ca 0d 18 38 | 09 20 c9 20 30 3a 0d 18 |110 ...8|. . 0:..|
|00004b80| 42 1e 20 20 69 6e 66 6f | 24 2b 3d 22 6e 6f 74 20 |B. info|$+="not |
|00004b90| 79 65 74 20 63 6c 65 61 | 72 65 64 22 0d 18 4c 09 |yet clea|red"..L.|
|00004ba0| 20 c9 20 32 3a 0d 18 56 | 14 20 20 e7 20 73 75 72 | . 2:..V|. . sur|
|00004bb0| 72 6d 69 6e 65 73 25 20 | 8c 0d 18 60 69 20 20 20 |rmines% |...`i |
|00004bc0| 20 e7 20 73 75 72 72 6d | 69 6e 65 73 25 3e 31 20 | . surrm|ines%>1 |
|00004bd0| 69 6e 66 6f 24 2b 3d 22 | 63 6c 65 61 72 3a 20 22 |info$+="|clear: "|
|00004be0| 2b c3 28 73 75 72 72 6d | 69 6e 65 73 25 29 2b 22 |+.(surrm|ines%)+"|
|00004bf0| 20 61 64 6a 61 63 65 6e | 74 20 6d 69 6e 65 73 22 | adjacen|t mines"|
|00004c00| 20 8b 20 69 6e 66 6f 24 | 2b 3d 22 63 6c 65 61 72 | . info$|+="clear|
|00004c10| 3a 20 31 20 61 64 6a 61 | 63 65 6e 74 20 6d 69 6e |: 1 adja|cent min|
|00004c20| 65 22 0d 18 6a 08 20 20 | 20 cc 0d 18 74 29 20 20 |e"..j. | ...t) |
|00004c30| 20 20 69 6e 66 6f 24 2b | 3d 22 63 6c 65 61 72 3a | info$+|="clear:|
|00004c40| 20 6e 6f 20 61 64 6a 61 | 63 65 6e 74 20 6d 69 6e | no adja|cent min|
|00004c50| 65 73 22 0d 18 7e 08 20 | 20 20 cd 0d 18 88 09 20 |es"..~. | ..... |
|00004c60| c9 20 34 3a 0d 18 92 16 | 20 20 69 6e 66 6f 24 2b |. 4:....| info$+|
|00004c70| 3d 22 66 6c 61 67 67 65 | 64 22 0d 18 9c 09 20 c9 |="flagge|d".... .|
|00004c80| 20 38 3a 0d 18 a6 16 20 | 20 69 6e 66 6f 24 2b 3d | 8:.... | info$+=|
|00004c90| 22 71 75 65 72 69 65 64 | 22 0d 18 b0 06 20 cb 0d |"queried|".... ..|
|00004ca0| 18 ba 14 f2 63 65 6e 74 | 72 65 28 69 6e 66 6f 24 |....cent|re(info$|
|00004cb0| 2c 31 29 0d 18 c4 76 e7 | 20 6e 65 69 67 68 62 6f |,1)...v.| neighbo|
|00004cc0| 75 72 73 25 3c 3e 31 20 | f2 63 65 6e 74 72 65 28 |urs%<>1 |.centre(|
|00004cd0| 22 54 68 69 73 20 63 65 | 6c 6c 20 68 61 73 20 22 |"This ce|ll has "|
|00004ce0| 2b c3 28 6e 65 69 67 68 | 62 6f 75 72 73 25 29 2b |+.(neigh|bours%)+|
|00004cf0| 22 20 6e 65 69 67 68 62 | 6f 75 72 73 22 2c 32 29 |" neighb|ours",2)|
|00004d00| 20 8b 20 f2 63 65 6e 74 | 72 65 28 22 54 68 69 73 | . .cent|re("This|
|00004d10| 20 63 65 6c 6c 20 68 61 | 73 20 31 20 6e 65 69 67 | cell ha|s 1 neig|
|00004d20| 68 62 6f 75 72 22 2c 32 | 29 0d 18 ce 62 e7 20 66 |hbour",2|)...b. f|
|00004d30| 6c 61 67 73 25 3c 3e 31 | 20 f2 63 65 6e 74 72 65 |lags%<>1| .centre|
|00004d40| 28 22 59 6f 75 20 68 61 | 76 65 20 22 2b c3 28 66 |("You ha|ve "+.(f|
|00004d50| 6c 61 67 73 25 29 2b 22 | 20 66 6c 61 67 73 20 6c |lags%)+"| flags l|
|00004d60| 65 66 74 22 2c 33 29 20 | 8b 20 f2 63 65 6e 74 72 |eft",3) |. .centr|
|00004d70| 65 28 22 59 6f 75 20 68 | 61 76 65 20 31 20 66 6c |e("You h|ave 1 fl|
|00004d80| 61 67 20 6c 65 66 74 22 | 2c 33 29 0d 18 d8 05 e1 |ag left"|,3).....|
|00004d90| 0d 18 e2 05 3a 0d 18 ec | 1b dd 20 f2 63 65 6e 74 |....:...|.. .cent|
|00004da0| 72 65 28 73 74 72 69 6e | 67 24 2c 72 6f 77 25 29 |re(strin|g$,row%)|
|00004db0| 0d 18 f6 2e e7 20 a9 28 | 73 74 72 69 6e 67 24 29 |..... .(|string$)|
|00004dc0| 3e 3d 78 63 6f 6c 25 2b | 31 20 f1 8a 30 2c 72 6f |>=xcol%+|1 ..0,ro|
|00004dd0| 77 25 29 3b 73 74 72 69 | 6e 67 24 3b 3a e1 0d 19 |w%);stri|ng$;:...|
|00004de0| 00 5f f1 8a 30 2c 72 6f | 77 25 29 3b 89 28 28 78 |._..0,ro|w%);.((x|
|00004df0| 63 6f 6c 25 2b 31 2d a9 | 28 73 74 72 69 6e 67 24 |col%+1-.|(string$|
|00004e00| 29 29 81 32 29 3b 73 74 | 72 69 6e 67 24 3b 89 28 |)).2);st|ring$;.(|
|00004e10| 78 63 6f 6c 25 2b 31 2d | a9 28 73 74 72 69 6e 67 |xcol%+1-|.(string|
|00004e20| 24 29 2d 28 28 78 63 6f | 6c 25 2b 31 2d a9 28 73 |$)-((xco|l%+1-.(s|
|00004e30| 74 72 69 6e 67 24 29 29 | 81 32 29 29 3b 0d 19 0a |tring$))|.2));...|
|00004e40| 05 e1 0d 19 14 05 3a 0d | 19 1e 19 dd 20 f2 70 6f |......:.|.... .po|
|00004e50| 73 68 74 69 74 6c 65 28 | 73 74 72 69 6e 67 24 29 |shtitle(|string$)|
|00004e60| 0d 19 28 1d ea 20 74 61 | 62 6c 65 25 28 29 2c 69 |..(.. ta|ble%(),i|
|00004e70| 25 2c 6a 25 2c 70 61 74 | 63 68 65 73 25 0d 19 32 |%,j%,pat|ches%..2|
|00004e80| 0e 70 61 74 63 68 65 73 | 25 3d 38 0d 19 3c 16 de |.patches|%=8..<..|
|00004e90| 20 74 61 62 6c 65 25 28 | 70 61 74 63 68 65 73 25 | table%(|patches%|
|00004ea0| 29 0d 19 46 15 e3 20 69 | 25 3d 30 20 b8 20 70 61 |)..F.. i|%=0 . pa|
|00004eb0| 74 63 68 65 73 25 0d 19 | 50 26 20 20 74 61 62 6c |tches%..|P& tabl|
|00004ec0| 65 25 28 69 25 29 3d b3 | 28 38 2a 78 73 63 61 6c |e%(i%)=.|(8*xscal|
|00004ed0| 65 25 2a a9 73 74 72 69 | 6e 67 24 29 0d 19 5a 06 |e%*.stri|ng$)..Z.|
|00004ee0| 20 ed 0d 19 64 17 e3 20 | 69 25 3d 30 20 b8 20 70 | ...d.. |i%=0 . p|
|00004ef0| 61 74 63 68 65 73 25 2d | 31 0d 19 6e 1a 20 20 e3 |atches%-|1..n. .|
|00004f00| 20 6a 25 3d 69 25 2b 31 | 20 b8 20 70 61 74 63 68 | j%=i%+1| . patch|
|00004f10| 65 73 25 0d 19 78 38 20 | 20 20 20 e7 20 74 61 62 |es%..x8 | . tab|
|00004f20| 6c 65 25 28 6a 25 29 3c | 74 61 62 6c 65 25 28 69 |le%(j%)<|table%(i|
|00004f30| 25 29 20 c8 94 20 74 61 | 62 6c 65 25 28 6a 25 29 |%) .. ta|ble%(j%)|
|00004f40| 2c 74 61 62 6c 65 25 28 | 69 25 29 0d 19 82 08 20 |,table%(|i%).... |
|00004f50| 20 20 ed 0d 19 8c 06 20 | ed 0d 19 96 0c e6 30 2c | ..... |......0,|
|00004f60| 31 35 3a ef 35 0d 19 a0 | 37 ec 28 78 6d 61 78 2b |15:.5...|7.(xmax+|
|00004f70| 78 6d 69 6e 29 2f 32 2d | 34 2a 78 73 63 61 6c 65 |xmin)/2-|4*xscale|
|00004f80| 25 2a a9 28 73 74 72 69 | 6e 67 24 29 2c 79 6d 61 |%*.(stri|ng$),yma|
|00004f90| 78 2b 33 32 2a 79 73 63 | 61 6c 65 25 0d 19 aa 12 |x+32*ysc|ale%....|
|00004fa0| f1 73 74 72 69 6e 67 24 | 3b 3a ef 34 3a 87 0d 19 |.string$|;:.4:...|
|00004fb0| b4 37 ec 28 78 6d 61 78 | 2b 78 6d 69 6e 29 2f 32 |.7.(xmax|+xmin)/2|
|00004fc0| 2d 34 2a 78 73 63 61 6c | 65 25 2a a9 28 73 74 72 |-4*xscal|e%*.(str|
|00004fd0| 69 6e 67 24 29 2c 79 6d | 61 78 2b 33 32 2a 79 73 |ing$),ym|ax+32*ys|
|00004fe0| 63 61 6c 65 25 0d 19 be | 37 ec 28 78 6d 61 78 2b |cale%...|7.(xmax+|
|00004ff0| 78 6d 69 6e 29 2f 32 2d | 34 2a 78 73 63 61 6c 65 |xmin)/2-|4*xscale|
|00005000| 25 2a a9 28 73 74 72 69 | 6e 67 24 29 2c 79 6d 61 |%*.(stri|ng$),yma|
|00005010| 78 2b 32 35 2a 79 73 63 | 61 6c 65 25 0d 19 c8 12 |x+25*ysc|ale%....|
|00005020| e3 69 25 3d 30 b8 70 61 | 74 63 68 65 73 25 0d 19 |.i%=0.pa|tches%..|
|00005030| d2 5f 20 20 e6 32 2c b3 | 28 34 29 2b 31 31 3a f0 |._ .2,.|(4)+11:.|
|00005040| 38 35 2c 28 78 6d 61 78 | 2b 78 6d 69 6e 29 2f 32 |85,(xmax|+xmin)/2|
|00005050| 2d 34 2a 78 73 63 61 6c | 65 25 2a a9 28 73 74 72 |-4*xscal|e%*.(str|
|00005060| 69 6e 67 24 29 2b 74 61 | 62 6c 65 25 28 69 25 29 |ing$)+ta|ble%(i%)|
|00005070| 2c 79 6d 61 78 2b 28 33 | 32 2d 37 2a 28 69 25 20 |,ymax+(3|2-7*(i% |
|00005080| 80 20 31 29 29 2a 79 73 | 63 61 6c 65 25 0d 19 dc |. 1))*ys|cale%...|
|00005090| 06 20 ed 0d 19 e6 45 e6 | 32 2c b3 28 34 29 2b 31 |. ....E.|2,.(4)+1|
|000050a0| 31 3a f0 38 35 2c 28 78 | 6d 61 78 2b 78 6d 69 6e |1:.85,(x|max+xmin|
|000050b0| 29 2f 32 2b 34 2a 78 73 | 63 61 6c 65 25 2a a9 28 |)/2+4*xs|cale%*.(|
|000050c0| 73 74 72 69 6e 67 24 29 | 2c 79 6d 61 78 2b 33 32 |string$)|,ymax+32|
|000050d0| 2a 79 73 63 61 6c 65 25 | 0d 19 f0 45 e6 32 2c b3 |*yscale%|...E.2,.|
|000050e0| 28 34 29 2b 31 31 3a f0 | 38 35 2c 28 78 6d 61 78 |(4)+11:.|85,(xmax|
|000050f0| 2b 78 6d 69 6e 29 2f 32 | 2b 34 2a 78 73 63 61 6c |+xmin)/2|+4*xscal|
|00005100| 65 25 2a a9 28 73 74 72 | 69 6e 67 24 29 2c 79 6d |e%*.(str|ing$),ym|
|00005110| 61 78 2b 32 35 2a 79 73 | 63 61 6c 65 25 0d 19 fa |ax+25*ys|cale%...|
|00005120| 08 e6 30 2c 33 0d 1a 04 | 0d e3 79 25 3d 30 20 b8 |..0,3...|..y%=0 .|
|00005130| 20 36 0d 1a 0e 28 20 20 | e3 78 25 3d 2d a9 28 73 | 6...( |.x%=-.(s|
|00005140| 74 72 69 6e 67 24 29 2a | 34 20 b8 20 a9 28 73 74 |tring$)*|4 . .(st|
|00005150| 72 69 6e 67 24 29 2a 34 | 2d 31 0d 1a 18 6c 20 20 |ring$)*4|-1...l |
|00005160| 20 20 e7 20 b0 28 78 6d | 61 78 2b 78 6d 69 6e 29 | . .(xm|ax+xmin)|
|00005170| 2f 32 2b 78 25 2a 78 73 | 63 61 6c 65 25 2c 79 6d |/2+x%*xs|cale%,ym|
|00005180| 61 78 2b 28 33 32 2d 79 | 25 29 2a 79 73 63 61 6c |ax+(32-y|%)*yscal|
|00005190| 65 25 29 3d 30 20 c8 92 | 20 28 78 6d 61 78 2b 78 |e%)=0 ..| (xmax+x|
|000051a0| 6d 69 6e 29 2f 32 2b 78 | 25 2a 78 73 63 61 6c 65 |min)/2+x|%*xscale|
|000051b0| 25 2c 79 6d 61 78 2b 28 | 33 32 2d 79 25 29 2a 79 |%,ymax+(|32-y%)*y|
|000051c0| 73 63 61 6c 65 25 0d 1a | 22 08 20 20 20 ed 0d 1a |scale%..|". ...|
|000051d0| 2c 06 20 ed 0d 1a 36 05 | e1 0d 1a 40 05 3a 0d 1a |,. ...6.|...@.:..|
|000051e0| 4a 36 dd 20 f2 6f 75 74 | 70 75 74 70 6f 69 6e 74 |J6. .out|putpoint|
|000051f0| 73 28 70 74 73 28 29 2c | 6e 70 74 73 25 2c 6c 65 |s(pts(),|npts%,le|
|00005200| 66 74 2c 72 69 67 68 74 | 2c 74 6f 70 2c 62 6f 74 |ft,right|,top,bot|
|00005210| 74 6f 6d 29 0d 1a 54 12 | ea 20 66 69 6c 65 25 2c |tom)..T.|. file%,|
|00005220| 63 6f 75 6e 74 25 0d 1a | 5e 1d 66 69 6c 65 25 3d |count%..|^.file%=|
|00005230| ae 22 3c 43 50 4d 24 50 | 61 74 68 3e 70 6f 69 6e |."<CPM$P|ath>poin|
|00005240| 74 73 22 0d 1a 68 11 f1 | 23 66 69 6c 65 25 2c 6e |ts"..h..|#file%,n|
|00005250| 70 74 73 25 0d 1a 72 16 | e3 20 63 6f 75 6e 74 25 |pts%..r.|. count%|
|00005260| 3d 31 20 b8 20 6e 70 74 | 73 25 0d 1a 7c 2f 20 20 |=1 . npt|s%..|/ |
|00005270| f1 23 66 69 6c 65 25 2c | 28 70 74 73 28 63 6f 75 |.#file%,|(pts(cou|
|00005280| 6e 74 25 2c 30 29 2d 6c | 65 66 74 29 2f 28 72 69 |nt%,0)-l|eft)/(ri|
|00005290| 67 68 74 2d 6c 65 66 74 | 29 0d 1a 86 31 20 20 f1 |ght-left|)...1 .|
|000052a0| 23 66 69 6c 65 25 2c 28 | 70 74 73 28 63 6f 75 6e |#file%,(|pts(coun|
|000052b0| 74 25 2c 31 29 2d 62 6f | 74 74 6f 6d 29 2f 28 74 |t%,1)-bo|ttom)/(t|
|000052c0| 6f 70 2d 62 6f 74 74 6f | 6d 29 0d 1a 90 06 20 ed |op-botto|m).... .|
|000052d0| 0d 1a 9a 0b d9 23 66 69 | 6c 65 25 0d 1a a4 05 e1 |.....#fi|le%.....|
|000052e0| 0d 1a ae 05 3a 0d 1a b8 | 29 dd 20 f2 69 6e 70 75 |....:...|). .inpu|
|000052f0| 74 70 6f 69 6e 74 73 28 | 6c 65 66 74 2c 72 69 67 |tpoints(|left,rig|
|00005300| 68 74 2c 74 6f 70 2c 62 | 6f 74 74 6f 6d 29 0d 1a |ht,top,b|ottom)..|
|00005310| c2 12 ea 20 66 69 6c 65 | 25 2c 63 6f 75 6e 74 25 |... file|%,count%|
|00005320| 0d 1a cc 1d 66 69 6c 65 | 25 3d 8e 22 3c 43 50 4d |....file|%=."<CPM|
|00005330| 24 50 61 74 68 3e 70 6f | 69 6e 74 73 22 0d 1a d6 |$Path>po|ints"...|
|00005340| 19 e8 23 66 69 6c 65 25 | 2c 6e 6f 5f 6f 66 5f 70 |..#file%|,no_of_p|
|00005350| 6f 69 6e 74 73 25 0d 1a | e0 1d de 20 70 6f 69 6e |oints%..|... poin|
|00005360| 74 73 28 6e 6f 5f 6f 66 | 5f 70 6f 69 6e 74 73 25 |ts(no_of|_points%|
|00005370| 2c 31 29 0d 1a ea 1e e3 | 20 63 6f 75 6e 74 25 3d |,1).....| count%=|
|00005380| 31 20 b8 20 6e 6f 5f 6f | 66 5f 70 6f 69 6e 74 73 |1 . no_o|f_points|
|00005390| 25 0d 1a f4 1e 20 20 e8 | 23 66 69 6c 65 25 2c 70 |%.... .|#file%,p|
|000053a0| 6f 69 6e 74 73 28 63 6f | 75 6e 74 25 2c 30 29 0d |oints(co|unt%,0).|
|000053b0| 1a fe 39 20 20 70 6f 69 | 6e 74 73 28 63 6f 75 6e |..9 poi|nts(coun|
|000053c0| 74 25 2c 30 29 3d 70 6f | 69 6e 74 73 28 63 6f 75 |t%,0)=po|ints(cou|
|000053d0| 6e 74 25 2c 30 29 2a 28 | 72 69 67 68 74 2d 6c 65 |nt%,0)*(|right-le|
|000053e0| 66 74 29 2b 6c 65 66 74 | 0d 1b 08 1e 20 20 e8 23 |ft)+left|.... .#|
|000053f0| 66 69 6c 65 25 2c 70 6f | 69 6e 74 73 28 63 6f 75 |file%,po|ints(cou|
|00005400| 6e 74 25 2c 31 29 0d 1b | 12 3b 20 20 70 6f 69 6e |nt%,1)..|.; poin|
|00005410| 74 73 28 63 6f 75 6e 74 | 25 2c 31 29 3d 70 6f 69 |ts(count|%,1)=poi|
|00005420| 6e 74 73 28 63 6f 75 6e | 74 25 2c 31 29 2a 28 74 |nts(coun|t%,1)*(t|
|00005430| 6f 70 2d 62 6f 74 74 6f | 6d 29 2b 62 6f 74 74 6f |op-botto|m)+botto|
|00005440| 6d 0d 1b 1c 06 20 ed 0d | 1b 26 0b d9 23 66 69 6c |m.... ..|.&..#fil|
|00005450| 65 25 0d 1b 30 05 e1 0d | 1b 3a 05 3a 0d 1b 44 2b |e%..0...|.:.:..D+|
|00005460| dd 20 f2 69 6e 70 75 74 | 76 65 72 74 69 63 65 73 |. .input|vertices|
|00005470| 28 6c 65 66 74 2c 72 69 | 67 68 74 2c 62 6f 74 74 |(left,ri|ght,bott|
|00005480| 6f 6d 2c 74 6f 70 29 0d | 1b 4e 15 ea 20 66 69 6c |om,top).|.N.. fil|
|00005490| 65 25 2c 63 6f 75 6e 74 | 25 2c 76 24 0d 1b 58 1f |e%,count|%,v$..X.|
|000054a0| 66 69 6c 65 25 3d 8e 22 | 3c 43 50 4d 24 50 61 74 |file%=."|<CPM$Pat|
|000054b0| 68 3e 76 65 72 74 69 63 | 65 73 22 0d 1b 62 0e e8 |h>vertic|es"..b..|
|000054c0| 23 66 69 6c 65 25 2c 76 | 24 0d 1b 6c 0d 76 65 72 |#file%,v|$..l.ver|
|000054d0| 74 25 3d a0 76 24 0d 1b | 76 1a de 20 76 65 72 74 |t%=.v$..|v.. vert|
|000054e0| 69 63 65 73 28 76 65 72 | 74 25 2b 31 30 2c 32 29 |ices(ver|t%+10,2)|
|000054f0| 0d 1b 80 16 e3 20 63 6f | 75 6e 74 25 3d 30 20 b8 |..... co|unt%=0 .|
|00005500| 20 76 65 72 74 25 0d 1b | 8a 20 20 20 e8 23 66 69 | vert%..|. .#fi|
|00005510| 6c 65 25 2c 76 65 72 74 | 69 63 65 73 28 63 6f 75 |le%,vert|ices(cou|
|00005520| 6e 74 25 2c 30 29 0d 1b | 94 3d 20 20 76 65 72 74 |nt%,0)..|.= vert|
|00005530| 69 63 65 73 28 63 6f 75 | 6e 74 25 2c 30 29 3d 76 |ices(cou|nt%,0)=v|
|00005540| 65 72 74 69 63 65 73 28 | 63 6f 75 6e 74 25 2c 30 |ertices(|count%,0|
|00005550| 29 2a 28 72 69 67 68 74 | 2d 6c 65 66 74 29 2b 6c |)*(right|-left)+l|
|00005560| 65 66 74 0d 1b 9e 20 20 | 20 e8 23 66 69 6c 65 25 |eft... | .#file%|
|00005570| 2c 76 65 72 74 69 63 65 | 73 28 63 6f 75 6e 74 25 |,vertice|s(count%|
|00005580| 2c 31 29 0d 1b a8 3f 20 | 20 76 65 72 74 69 63 65 |,1)...? | vertice|
|00005590| 73 28 63 6f 75 6e 74 25 | 2c 31 29 3d 76 65 72 74 |s(count%|,1)=vert|
|000055a0| 69 63 65 73 28 63 6f 75 | 6e 74 25 2c 31 29 2a 28 |ices(cou|nt%,1)*(|
|000055b0| 74 6f 70 2d 62 6f 74 74 | 6f 6d 29 2b 62 6f 74 74 |top-bott|om)+bott|
|000055c0| 6f 6d 0d 1b b2 20 20 20 | e8 23 66 69 6c 65 25 2c |om... |.#file%,|
|000055d0| 76 65 72 74 69 63 65 73 | 28 63 6f 75 6e 74 25 2c |vertices|(count%,|
|000055e0| 32 29 0d 1b bc 06 20 ed | 0d 1b c6 0b d9 23 66 69 |2).... .|.....#fi|
|000055f0| 6c 65 25 0d 1b d0 05 e1 | 0d 1b da 05 3a 0d 1b e4 |le%.....|....:...|
|00005600| 47 dd 20 f2 6f 75 74 70 | 75 74 5f 6e 65 61 72 65 |G. .outp|ut_neare|
|00005610| 73 74 5f 76 65 72 74 69 | 63 65 73 28 70 74 73 28 |st_verti|ces(pts(|
|00005620| 29 2c 6e 70 74 73 25 2c | 65 64 67 65 73 28 29 2c |),npts%,|edges(),|
|00005630| 6d 69 6e 78 2c 6d 61 78 | 78 2c 6d 69 6e 79 2c 6d |minx,max|x,miny,m|
|00005640| 61 78 79 29 0d 1b ee 66 | ea 20 70 6f 69 6e 74 25 |axy)...f|. point%|
|00005650| 2c 63 6d 70 31 25 2c 63 | 6d 70 32 25 2c 63 6c 6f |,cmp1%,c|mp2%,clo|
|00005660| 73 65 73 74 25 2c 63 6d | 70 63 6c 6f 73 65 25 2c |sest%,cm|pclose%,|
|00005670| 69 6e 74 6c 69 6e 65 31 | 28 29 2c 69 6e 74 6c 69 |intline1|(),intli|
|00005680| 6e 65 32 28 29 2c 63 68 | 65 63 6b 6c 69 6e 65 28 |ne2(),ch|eckline(|
|00005690| 29 2c 76 65 72 74 65 78 | 28 29 2c 66 69 6c 65 25 |),vertex|(),file%|
|000056a0| 2c 76 65 72 74 69 63 65 | 73 25 0d 1b f8 33 de 69 |,vertice|s%...3.i|
|000056b0| 6e 74 6c 69 6e 65 31 28 | 32 29 2c 69 6e 74 6c 69 |ntline1(|2),intli|
|000056c0| 6e 65 32 28 32 29 2c 63 | 68 65 63 6b 6c 69 6e 65 |ne2(2),c|heckline|
|000056d0| 28 32 29 2c 76 65 72 74 | 65 78 28 31 29 0d 1c 02 |(2),vert|ex(1)...|
|000056e0| 1f 66 69 6c 65 25 3d ae | 22 3c 43 50 4d 24 50 61 |.file%=.|"<CPM$Pa|
|000056f0| 74 68 3e 76 65 72 74 69 | 63 65 73 22 0d 1c 0c 14 |th>verti|ces"....|
|00005700| f1 23 66 69 6c 65 25 2c | c4 31 30 2c 22 20 22 29 |.#file%,|.10," ")|
|00005710| 0d 1c 16 0f 76 65 72 74 | 69 63 65 73 25 3d 30 0d |....vert|ices%=0.|
|00005720| 1c 20 14 c8 99 22 48 6f | 75 72 67 6c 61 73 73 5f |. ..."Ho|urglass_|
|00005730| 4f 6e 22 0d 1c 2a 16 e3 | 20 70 6f 69 6e 74 25 3d |On"..*..| point%=|
|00005740| 31 20 b8 20 6e 70 74 73 | 25 0d 1c 34 32 20 20 c8 |1 . npts|%..42 .|
|00005750| 99 22 48 6f 75 72 67 6c | 61 73 73 5f 50 65 72 63 |."Hourgl|ass_Perc|
|00005760| 65 6e 74 61 67 65 22 2c | a8 28 31 30 30 2a 70 6f |entage",|.(100*po|
|00005770| 69 6e 74 25 2f 6e 70 74 | 73 25 29 0d 1c 3e 19 20 |int%/npt|s%)..>. |
|00005780| 20 e3 20 63 6d 70 31 25 | 3d 32 20 b8 20 6e 70 74 | . cmp1%|=2 . npt|
|00005790| 73 25 2b 34 0d 1c 48 19 | 20 20 20 20 e7 20 63 6d |s%+4..H.| . cm|
|000057a0| 70 31 25 3c 3e 70 6f 69 | 6e 74 25 20 8c 0d 1c 52 |p1%<>poi|nt% ...R|
|000057b0| 46 20 20 20 20 20 20 f2 | 6c 69 6e 65 66 72 6f 6d |F .|linefrom|
|000057c0| 70 6f 69 6e 74 73 28 69 | 6e 74 6c 69 6e 65 31 28 |points(i|ntline1(|
|000057d0| 29 2c 70 74 73 28 29 2c | 70 6f 69 6e 74 25 2c 63 |),pts(),|point%,c|
|000057e0| 6d 70 31 25 2c 6e 70 74 | 73 25 2c 65 64 67 65 73 |mp1%,npt|s%,edges|
|000057f0| 28 29 29 0d 1c 5c 1b 20 | 20 20 20 20 20 e3 20 63 |())..\. | . c|
|00005800| 6d 70 32 25 3d 31 20 b8 | 20 63 6d 70 31 25 0d 1c |mp2%=1 .| cmp1%..|
|00005810| 66 2c 20 20 20 20 20 20 | 20 20 e7 20 63 6d 70 32 |f, | . cmp2|
|00005820| 25 3c 3e 70 6f 69 6e 74 | 25 20 80 20 63 6d 70 32 |%<>point|% . cmp2|
|00005830| 25 3c 3e 63 6d 70 31 25 | 20 8c 0d 1c 70 4a 20 20 |%<>cmp1%| ...pJ |
|00005840| 20 20 20 20 20 20 20 20 | f2 6c 69 6e 65 66 72 6f | |.linefro|
|00005850| 6d 70 6f 69 6e 74 73 28 | 69 6e 74 6c 69 6e 65 32 |mpoints(|intline2|
|00005860| 28 29 2c 70 74 73 28 29 | 2c 70 6f 69 6e 74 25 2c |(),pts()|,point%,|
|00005870| 63 6d 70 32 25 2c 6e 70 | 74 73 25 2c 65 64 67 65 |cmp2%,np|ts%,edge|
|00005880| 73 28 29 29 0d 1c 7a 3c | 20 20 20 20 20 20 20 20 |s())..z<| |
|00005890| 20 20 e7 20 a4 69 6e 74 | 65 72 73 65 63 74 28 76 | . .int|ersect(v|
|000058a0| 65 72 74 65 78 28 29 2c | 69 6e 74 6c 69 6e 65 31 |ertex(),|intline1|
|000058b0| 28 29 2c 69 6e 74 6c 69 | 6e 65 32 28 29 29 20 8c |(),intli|ne2()) .|
|000058c0| 0d 1c 84 1a 20 20 20 20 | 20 20 20 20 20 20 20 20 |.... | |
|000058d0| 63 6c 6f 73 65 73 74 25 | 3d b9 0d 1c 8e 1b 20 20 |closest%|=..... |
|000058e0| 20 20 20 20 20 20 20 20 | 20 20 63 6d 70 63 6c 6f | | cmpclo|
|000058f0| 73 65 25 3d 31 0d 1c 98 | 2f 20 20 20 20 20 20 20 |se%=1...|/ |
|00005900| 20 20 20 20 20 c8 95 63 | 6d 70 63 6c 6f 73 65 25 | ..c|mpclose%|
|00005910| 3c 3d 6e 70 74 73 25 2b | 34 20 80 20 63 6c 6f 73 |<=npts%+|4 . clos|
|00005920| 65 73 74 25 0d 1c a2 4c | 20 20 20 20 20 20 20 20 |est%...L| |
|00005930| 20 20 20 20 20 20 e7 63 | 6d 70 63 6c 6f 73 65 25 | .c|mpclose%|
|00005940| 3c 3e 70 6f 69 6e 74 25 | 20 80 20 63 6d 70 63 6c |<>point%| . cmpcl|
|00005950| 6f 73 65 25 3c 3e 63 6d | 70 31 25 20 80 20 63 6d |ose%<>cm|p1% . cm|
|00005960| 70 63 6c 6f 73 65 25 3c | 3e 63 6d 70 32 25 20 8c |pclose%<|>cmp2% .|
|00005970| 0d 1c ac 55 20 20 20 20 | 20 20 20 20 20 20 20 20 |...U | |
|00005980| 20 20 20 20 f2 6c 69 6e | 65 66 72 6f 6d 70 6f 69 | .lin|efrompoi|
|00005990| 6e 74 73 28 63 68 65 63 | 6b 6c 69 6e 65 28 29 2c |nts(chec|kline(),|
|000059a0| 70 74 73 28 29 2c 70 6f | 69 6e 74 25 2c 63 6d 70 |pts(),po|int%,cmp|
|000059b0| 63 6c 6f 73 65 25 2c 6e | 70 74 73 25 2c 65 64 67 |close%,n|pts%,edg|
|000059c0| 65 73 28 29 29 0d 1c b6 | 85 20 20 20 20 20 20 20 |es())...|. |
|000059d0| 20 20 20 20 20 20 20 20 | 20 e7 20 b4 28 a4 65 76 | | . .(.ev|
|000059e0| 61 6c 6c 69 6e 65 28 63 | 68 65 63 6b 6c 69 6e 65 |alline(c|heckline|
|000059f0| 28 29 2c 70 74 73 28 70 | 6f 69 6e 74 25 2c 30 29 |(),pts(p|oint%,0)|
|00005a00| 2c 70 74 73 28 70 6f 69 | 6e 74 25 2c 31 29 29 29 |,pts(poi|nt%,1)))|
|00005a10| 3c 3e b4 28 a4 65 76 61 | 6c 6c 69 6e 65 28 63 68 |<>.(.eva|lline(ch|
|00005a20| 65 63 6b 6c 69 6e 65 28 | 29 2c 76 65 72 74 65 78 |eckline(|),vertex|
|00005a30| 28 30 29 2c 76 65 72 74 | 65 78 28 31 29 29 29 20 |(0),vert|ex(1))) |
|00005a40| 63 6c 6f 73 65 73 74 25 | 3d a3 0d 1c c0 14 20 20 |closest%|=..... |
|00005a50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 cd 0d 1c | | ...|
|00005a60| ca 1e 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.. | |
|00005a70| 63 6d 70 63 6c 6f 73 65 | 25 2b 3d 31 0d 1c d4 12 |cmpclose|%+=1....|
|00005a80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 ce 0d 1c | | ...|
|00005a90| de 1c 20 20 20 20 20 20 | 20 20 20 20 20 20 e7 20 |.. | . |
|00005aa0| 63 6c 6f 73 65 73 74 25 | 20 8c 0d 1c e8 36 20 20 |closest%| ....6 |
|00005ab0| 20 20 20 20 20 20 20 20 | 20 20 20 20 f1 23 66 69 | | .#fi|
|00005ac0| 6c 65 25 2c 28 76 65 72 | 74 65 78 28 30 29 2d 6d |le%,(ver|tex(0)-m|
|00005ad0| 69 6e 78 29 2f 28 6d 61 | 78 78 2d 6d 69 6e 78 29 |inx)/(ma|xx-minx)|
|00005ae0| 0d 1c f2 36 20 20 20 20 | 20 20 20 20 20 20 20 20 |...6 | |
|00005af0| 20 20 f1 23 66 69 6c 65 | 25 2c 28 76 65 72 74 65 | .#file|%,(verte|
|00005b00| 78 28 31 29 2d 6d 69 6e | 79 29 2f 28 6d 61 78 79 |x(1)-min|y)/(maxy|
|00005b10| 2d 6d 69 6e 79 29 0d 1c | fc 20 20 20 20 20 20 20 |-miny)..|. |
|00005b20| 20 20 20 20 20 20 20 20 | f1 23 66 69 6c 65 25 2c | |.#file%,|
|00005b30| 70 6f 69 6e 74 25 0d 1d | 06 1e 20 20 20 20 20 20 |point%..|.. |
|00005b40| 20 20 20 20 20 20 20 20 | 76 65 72 74 69 63 65 73 | |vertices|
|00005b50| 25 2b 3d 31 0d 1d 10 12 | 20 20 20 20 20 20 20 20 |%+=1....| |
|00005b60| 20 20 20 20 20 cd 0d 1d | 1a 10 20 20 20 20 20 20 | ...|.. |
|00005b70| 20 20 20 20 20 cd 0d 1d | 24 0e 20 20 20 20 20 20 | ...|$. |
|00005b80| 20 20 20 cd 0d 1d 2e 0c | 20 20 20 20 20 20 20 ed | .....| .|
|00005b90| 0d 1d 38 0a 20 20 20 20 | 20 cd 0d 1d 42 08 20 20 |..8. | ...B. |
|00005ba0| 20 ed 0d 1d 4c 06 20 ed | 0d 1d 56 0b d9 23 66 69 | ...L. .|..V..#fi|
|00005bb0| 6c 65 25 0d 1d 60 1f 66 | 69 6c 65 25 3d ad 22 3c |le%..`.f|ile%=."<|
|00005bc0| 43 50 4d 24 50 61 74 68 | 3e 76 65 72 74 69 63 65 |CPM$Path|>vertice|
|00005bd0| 73 22 0d 1d 6a 35 f1 23 | 66 69 6c 65 25 2c c4 31 |s"..j5.#|file%,.1|
|00005be0| 30 2d a9 28 c3 28 76 65 | 72 74 69 63 65 73 25 2d |0-.(.(ve|rtices%-|
|00005bf0| 31 29 29 2c 22 20 22 29 | 2b c3 28 76 65 72 74 69 |1))," ")|+.(verti|
|00005c00| 63 65 73 25 2d 31 29 0d | 1d 74 0b d9 23 66 69 6c |ces%-1).|.t..#fil|
|00005c10| 65 25 0d 1d 7e 15 c8 99 | 22 48 6f 75 72 67 6c 61 |e%..~...|"Hourgla|
|00005c20| 73 73 5f 4f 66 66 22 0d | 1d 88 05 e1 0d ff |ss_Off".|...... |
+--------+-------------------------+-------------------------+--------+--------+
